Commit ee743dca authored by Andy Polyakov's avatar Andy Polyakov
Browse files

perlasm/x86masm.pl: fix last fix.

parent 6da165c6

crypto/perlasm/x86masm.pl

+1 −1
Original line number Diff line number Diff line
@@ -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