Reverted patch for PR#2095. Addressed by Andy now in x86_64-xlate.pl
[oweals/openssl.git] / crypto / sha / asm / sha512-armv4.pl
index da720bd5d3228bf4bf8f130411d0c651cd31b199..f27e9cd31953a8f86bc6212a2addfdb289cedce0 100644 (file)
@@ -22,6 +22,9 @@ $hi=0;
 $lo=4;
 # ====================================================================
 
+$output=shift;
+open STDOUT,">$output";
+
 $ctx="r0";
 $inp="r1";
 $len="r2";
@@ -390,4 +393,6 @@ $code.=<<___;
 ___
 
 $code =~ s/\`([^\`]*)\`/eval $1/gem;
+$code =~ s/\bbx\s+lr\b/.word\t0xe12fff1e/gm;   # make it possible to compile with -march=armv4
 print $code;
+close STDOUT; # enforce flush