diff options
author | djm <> | 2005-04-29 05:39:33 +0000 |
---|---|---|
committer | djm <> | 2005-04-29 05:39:33 +0000 |
commit | 68edd00d9258df93b1366c71ac124e0cadf7bc08 (patch) | |
tree | 3ce4ae2a9747bbc11aed1f95f9bbea92c41f8683 /src/lib/libcrypto/perlasm/x86nasm.pl | |
parent | f396ed0f5ce0af56bfde2e75e15cf1f52924c779 (diff) | |
download | openbsd-68edd00d9258df93b1366c71ac124e0cadf7bc08.tar.gz openbsd-68edd00d9258df93b1366c71ac124e0cadf7bc08.tar.bz2 openbsd-68edd00d9258df93b1366c71ac124e0cadf7bc08.zip |
resolve conflicts
Diffstat (limited to 'src/lib/libcrypto/perlasm/x86nasm.pl')
-rw-r--r-- | src/lib/libcrypto/perlasm/x86nasm.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/lib/libcrypto/perlasm/x86nasm.pl b/src/lib/libcrypto/perlasm/x86nasm.pl index 30346af4ea..5009acb4b3 100644 --- a/src/lib/libcrypto/perlasm/x86nasm.pl +++ b/src/lib/libcrypto/perlasm/x86nasm.pl | |||
@@ -86,7 +86,7 @@ sub get_mem | |||
86 | { | 86 | { |
87 | my($size,$addr,$reg1,$reg2,$idx)=@_; | 87 | my($size,$addr,$reg1,$reg2,$idx)=@_; |
88 | my($t,$post); | 88 | my($t,$post); |
89 | my($ret)="["; | 89 | my($ret)="$size ["; |
90 | $addr =~ s/^\s+//; | 90 | $addr =~ s/^\s+//; |
91 | if ($addr =~ /^(.+)\+(.+)$/) | 91 | if ($addr =~ /^(.+)\+(.+)$/) |
92 | { | 92 | { |
@@ -169,6 +169,7 @@ sub main'not { &out1("not",@_); } | |||
169 | sub main'call { &out1("call",($_[0]=~/^\$L/?'':'_').$_[0]); } | 169 | sub main'call { &out1("call",($_[0]=~/^\$L/?'':'_').$_[0]); } |
170 | sub main'ret { &out0("ret"); } | 170 | sub main'ret { &out0("ret"); } |
171 | sub main'nop { &out0("nop"); } | 171 | sub main'nop { &out0("nop"); } |
172 | sub main'movz { &out2("movzx",@_); } | ||
172 | 173 | ||
173 | sub out2 | 174 | sub out2 |
174 | { | 175 | { |
@@ -176,6 +177,11 @@ sub out2 | |||
176 | my($l,$t); | 177 | my($l,$t); |
177 | 178 | ||
178 | push(@out,"\t$name\t"); | 179 | push(@out,"\t$name\t"); |
180 | if ($name eq "lea") | ||
181 | { | ||
182 | $p1 =~ s/^[^\[]*\[/\[/; | ||
183 | $p2 =~ s/^[^\[]*\[/\[/; | ||
184 | } | ||
179 | $t=&conv($p1).","; | 185 | $t=&conv($p1).","; |
180 | $l=length($t); | 186 | $l=length($t); |
181 | push(@out,$t); | 187 | push(@out,$t); |