From: Andy Polyakov <appro@openssl.org>
Date: Thu, 29 Mar 2012 18:11:21 +0000 (+0000)
Subject: perlasm/x86masm.pl: fix last fix [from HEAD].
X-Git-Tag: OpenSSL_1_0_1a~31
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=8c67b13407b06dd9d2c3449356e9348925e79d0c;p=openssl

perlasm/x86masm.pl: fix last fix [from HEAD].
---

diff --git a/crypto/perlasm/x86masm.pl b/crypto/perlasm/x86masm.pl
index 3af045396e..96b1b73e1a 100644
--- a/crypto/perlasm/x86masm.pl
+++ b/crypto/perlasm/x86masm.pl
@@ -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