generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Make "perl des-586.pl a.out" work, see RT#402

Browse Source
This commit is contained in:
Andy Polyakov 2002-12-17 08:05:49 +00:00
parent 62966f3829
commit 4553ed276b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
crypto/perlasm/x86unix.pl
View File

@ -167,7 +167,7 @@ sub main'pop { &out1("popl",@_); $stack-=4; }
sub main'pushf { &out0("pushf"); $stack+=4; }
sub main'popf { &out0("popf"); $stack-=4; }
sub main'not { &out1("notl",@_); }
sub main'call { &out1("call",$under.$_[0]); }
sub main'call { &out1("call",($_[0]=~/^\.L/?'':$under).$_[0]); }
sub main'ret { &out0("ret"); }
sub main'nop { &out0("nop"); }