perlasm/x86masm.pl: fix last fix.
authorAndy Polyakov <appro@openssl.org>
Thu, 29 Mar 2012 18:09:36 +0000 (18:09 +0000)
committerAndy Polyakov <appro@openssl.org>
Thu, 29 Mar 2012 18:09:36 +0000 (18:09 +0000)
crypto/perlasm/x86masm.pl

index 328ca2e23fd6012a549618260d8c2d606c066036..f937d07c87dfb956cd60010c871e67e456f31dcb 100644 (file)
@@ -16,7 +16,7 @@ sub ::generic
     # fix hexadecimal constants
     for (@arg) { s/(?<![\w\$\.])0x([0-9a-f]+)/0$1h/oi; }
 
-    if ($opcode =~ /lea/ && @arg[1] =~ s/.*PTR\s+([^\[]+)$/$1/)        # no []
+    if ($opcode =~ /lea/ && @arg[1] =~ s/.*PTR\s+(\(.*\))$/OFFSET $1/) # no []
     {  $opcode="mov";  }
     elsif ($opcode !~ /movq/)
     {  # fix xmm references