diff options
| author | Andy Polyakov <appro@openssl.org> | 2005-12-06 18:43:59 +0000 |
|---|---|---|
| committer | Andy Polyakov <appro@openssl.org> | 2005-12-06 18:43:59 +0000 |
| commit | 3ebf898e88f1f3c9347bba11e8a6ee2bdb83dded (patch) | |
| tree | 89c85766ce467847bc6328349a859a5e2260a5c1 /crypto/perlasm/x86unix.pl | |
| parent | a4c886e4c87c56dc9fb184f0e2992e95a29857d5 (diff) | |
| download | openssl-3ebf898e88f1f3c9347bba11e8a6ee2bdb83dded.tar.gz | |
Support for indirect calls in x86 assembler modules.
Diffstat (limited to 'crypto/perlasm/x86unix.pl')
| -rw-r--r-- | crypto/perlasm/x86unix.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/crypto/perlasm/x86unix.pl b/crypto/perlasm/x86unix.pl index 348bf2d357..e71050b6bc 100644 --- a/crypto/perlasm/x86unix.pl +++ b/crypto/perlasm/x86unix.pl @@ -200,6 +200,7 @@ sub main'call { my $pre=$under; { if ($label{$i} eq $_[0]) { $pre=''; last; } } &out1("call",$pre.$_[0]); } +sub main'call_ptr { &out1p("call",@_); } sub main'ret { &out0("ret"); } sub main'nop { &out0("nop"); } sub main'test { &out2("testl",@_); } |