experimental function to convert ASN1_TIME to tm, not used or even compiled in yet

[openssl.git] / crypto / pariscid.pl

diff --git a/crypto/pariscid.pl b/crypto/pariscid.pl
index c411b7175dc3327d2ea51eb3f23fbb1b46b570d0..1ed53819573fd2d1e0864b48bc9d405062b67b2c 100644 (file)
--- a/crypto/pariscid.pl
+++ b/crypto/pariscid.pl
@@ -23,6 +23,17 @@ $code=<<___;
        .SPACE  \$TEXT\$
        .SUBSPA \$CODE\$,QUAD=0,ALIGN=8,ACCESS=0x2C,CODE_ONLY
 
+       .EXPORT OPENSSL_cpuid_setup,ENTRY
+       .ALIGN  8
+OPENSSL_cpuid_setup
+       .PROC
+       .CALLINFO       NO_CALLS
+       .ENTRY
+       bv      ($rp)
+       .EXIT
+       nop
+       .PROCEND
+
        .EXPORT OPENSSL_rdtsc,ENTRY
        .ALIGN  8
 OPENSSL_rdtsc
@@ -86,7 +97,9 @@ OPENSSL_cleanse
        .PROC
        .CALLINFO       NO_CALLS
        .ENTRY
-       cmpib,*>>       15,$len,Little
+       cmpib,*=        0,$len,Ldone
+       nop
+       cmpib,*>>=      15,$len,Little
        ldi             $SIZE_T-1,%r1
 
 Lalign
@@ -101,14 +114,14 @@ Laligned
        andcm           $len,%r1,%r28
 Loop
        $ST             %r0,0($inp)
-       addib,*vnz      -$SIZE_T,%r28,Loop
+       addib,*<>       -$SIZE_T,%r28,Loop
        ldo             $SIZE_T($inp),$inp
 
        and,*<>         $len,%r1,$len
        b,n             Ldone
 Little
        stb             %r0,0($inp)
-       addib,*vnz      -1,$len,Little
+       addib,*<>       -1,$len,Little
        ldo             1($inp),$inp
 Ldone
        bv              ($rp)