perlasm/x86_64-xlate.pl: work around problem with hex constants in masm.
[openssl.git] / crypto / perlasm / x86_64-xlate.pl
index b612c215a0548ceb2ee5d583f16da1b7d85f61ce..645be9184d96853b5012aea5fc008327bc489abe 100755 (executable)
@@ -212,8 +212,9 @@ my %globals;
            }
            sprintf "\$%s",$self->{value};
        } else {
-           $self->{value} =~ s/0x([0-9a-f]+)/0$1h/ig if ($masm);
-           sprintf "%s",$self->{value};
+           my $value = $self->{value};
+           $value =~ s/0x([0-9a-f]+)/0$1h/ig if ($masm);
+           sprintf "%s",$value;
        }
     }
 }