diff options
| author | Andy Polyakov <appro@openssl.org> | 2004-11-27 15:14:58 +0000 |
|---|---|---|
| committer | Andy Polyakov <appro@openssl.org> | 2004-11-27 15:14:58 +0000 |
| commit | 914c2a28c05797dc44fb3f498e6e12e5bc0db2b3 (patch) | |
| tree | 715b6551a8f7f664a8b1070f526839e02d232afb /crypto/perlasm | |
| parent | ea681ba87228c3b26f143f9c1aca07b114dbfd40 (diff) | |
perlasm/x86[ms|nasm] update to accomodate updated RC4 assembler module.
Diffstat (limited to 'crypto/perlasm')
| -rw-r--r-- | crypto/perlasm/x86ms.pl | 9 | ||||
| -rw-r--r-- | crypto/perlasm/x86nasm.pl | 1 |
2 files changed, 6 insertions, 4 deletions
diff --git a/crypto/perlasm/x86ms.pl b/crypto/perlasm/x86ms.pl index 3764760585..4f4a6fea9d 100644 --- a/crypto/perlasm/x86ms.pl +++ b/crypto/perlasm/x86ms.pl @@ -174,6 +174,7 @@ sub main'leave { &out0("leave"); } sub main'cpuid { &out0("DW\t0A20Fh"); } sub main'rdtsc { &out0("DW\t0310Fh"); } sub main'halt { &out0("hlt"); } +sub main'movz { &out2("movzx",@_); } # SSE2 sub main'emms { &out0("emms"); } @@ -255,7 +256,7 @@ sub main'function_begin push(@labels,$func); local($tmp)=<<"EOF"; -_TEXT SEGMENT +_TEXT\$ SEGMENT PARA PUBLIC _$func $extra _$func PROC NEAR @@ -273,7 +274,7 @@ sub main'function_begin_B local($func,$extra)=@_; local($tmp)=<<"EOF"; -_TEXT SEGMENT +_TEXT\$ SEGMENT PARA PUBLIC _$func $extra _$func PROC NEAR @@ -293,7 +294,7 @@ sub main'function_end pop ebp ret _$func ENDP -_TEXT ENDS +_TEXT\$ ENDS EOF push(@out,$tmp); $stack=0; @@ -306,7 +307,7 @@ sub main'function_end_B local($tmp)=<<"EOF"; _$func ENDP -_TEXT ENDS +_TEXT\$ ENDS EOF push(@out,$tmp); $stack=0; diff --git a/crypto/perlasm/x86nasm.pl b/crypto/perlasm/x86nasm.pl index 27080a0f83..965bff1bd3 100644 --- a/crypto/perlasm/x86nasm.pl +++ b/crypto/perlasm/x86nasm.pl @@ -192,6 +192,7 @@ sub main'leave { &out0("leave"); } sub main'cpuid { &out0("cpuid"); } sub main'rdtsc { &out0("rdtsc"); } sub main'halt { &out0("hlt"); } +sub main'movz { &out2("movzx",@_); } # SSE2 sub main'emms { &out0("emms"); } |