First attempt at adding the possibility to set the pointer size for the builds on...
[oweals/openssl.git] / crypto / ppccpuid.pl
index b136c4d3dc872ac4e178bd3cbe0bf2e803c08061..369e1d0df932c66022b970db3f61d117385e2574 100755 (executable)
@@ -20,6 +20,7 @@ if ($flavour=~/64/) {
 }
 
 $code=<<___;
+.machine       "any"
 .text
 
 .globl .OPENSSL_cpuid_setup
@@ -66,6 +67,8 @@ Loop: lwarx   r5,0,r3
        $CMPLI  r4,7
        li      r0,0
        bge     Lot
+       $CMPLI  r4,0
+       beqlr-
 Little:        mtctr   r4
        stb     r0,0(r3)
        addi    r3,r3,1