Back-port TLS AEAD framework [from HEAD].
[openssl.git] / crypto / alphacpuid.pl
index 1908216532c4d56f555ff5728fe3137e7f6757ee..c9474ff497521ed7e42c149ce73d80ba969b5c7f 100644 (file)
@@ -1,5 +1,5 @@
 #!/usr/bin/env perl
-print <<___;
+print <<'___';
 .text
 
 .set   noat
@@ -70,9 +70,9 @@ OPENSSL_wipe_cpu:
 OPENSSL_atomic_add:
        .frame  $30,0,$26
        .prologue 0
-1:     ldl_l   $0,($16)
+1:     ldl_l   $0,0($16)
        addl    $0,$17,$1
-       stl_c   $1,($16)
+       stl_c   $1,0($16)
        beq     $1,1b
        addl    $0,$17,$0
        ret     ($26)