perlasm/x86[ms|nasm] update to accomodate updated RC4 assembler module.

This commit is contained in:
Andy Polyakov 2004-11-27 15:14:58 +00:00
parent ea681ba872
commit 914c2a28c0
2 changed files with 6 additions and 4 deletions

View File

@ -174,6 +174,7 @@ sub main'leave { &out0("leave"); }
sub main'cpuid { &out0("DW\t0A20Fh"); } sub main'cpuid { &out0("DW\t0A20Fh"); }
sub main'rdtsc { &out0("DW\t0310Fh"); } sub main'rdtsc { &out0("DW\t0310Fh"); }
sub main'halt { &out0("hlt"); } sub main'halt { &out0("hlt"); }
sub main'movz { &out2("movzx",@_); }
# SSE2 # SSE2
sub main'emms { &out0("emms"); } sub main'emms { &out0("emms"); }
@ -255,7 +256,7 @@ sub main'function_begin
push(@labels,$func); push(@labels,$func);
local($tmp)=<<"EOF"; local($tmp)=<<"EOF";
_TEXT SEGMENT _TEXT\$ SEGMENT PARA
PUBLIC _$func PUBLIC _$func
$extra $extra
_$func PROC NEAR _$func PROC NEAR
@ -273,7 +274,7 @@ sub main'function_begin_B
local($func,$extra)=@_; local($func,$extra)=@_;
local($tmp)=<<"EOF"; local($tmp)=<<"EOF";
_TEXT SEGMENT _TEXT\$ SEGMENT PARA
PUBLIC _$func PUBLIC _$func
$extra $extra
_$func PROC NEAR _$func PROC NEAR
@ -293,7 +294,7 @@ sub main'function_end
pop ebp pop ebp
ret ret
_$func ENDP _$func ENDP
_TEXT ENDS _TEXT\$ ENDS
EOF EOF
push(@out,$tmp); push(@out,$tmp);
$stack=0; $stack=0;
@ -306,7 +307,7 @@ sub main'function_end_B
local($tmp)=<<"EOF"; local($tmp)=<<"EOF";
_$func ENDP _$func ENDP
_TEXT ENDS _TEXT\$ ENDS
EOF EOF
push(@out,$tmp); push(@out,$tmp);
$stack=0; $stack=0;

View File

@ -192,6 +192,7 @@ sub main'leave { &out0("leave"); }
sub main'cpuid { &out0("cpuid"); } sub main'cpuid { &out0("cpuid"); }
sub main'rdtsc { &out0("rdtsc"); } sub main'rdtsc { &out0("rdtsc"); }
sub main'halt { &out0("hlt"); } sub main'halt { &out0("hlt"); }
sub main'movz { &out2("movzx",@_); }
# SSE2 # SSE2
sub main'emms { &out0("emms"); } sub main'emms { &out0("emms"); }