paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 09:26:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed stupid error in previous commit :/

Browse Source
This commit is contained in:
Jonas Maebe 2000-10-17 15:41:48 +00:00
parent 3394523d13
commit a9656de262
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/i386/n386mat.pas
View File

@ -629,8 +629,8 @@ implementation
else else
getexplicitregister32(R_ECX); getexplicitregister32(R_ECX);
emit_reg_reg(A_MOV,S_L,hregister2,R_ECX); emit_reg_reg(A_MOV,S_L,hregister2,R_ECX);
ungetregister32(hregister2);
end; end;
ungetregister32(hregister2);
{ right operand is in ECX } { right operand is in ECX }
emit_reg_reg(op,S_L,R_CL,hregister1); emit_reg_reg(op,S_L,R_CL,hregister1);
{ maybe ECX back } { maybe ECX back }
@ -991,8 +991,8 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.2 2000-10-17 15:39:34 jonas Revision 1.3 2000-10-17 15:41:48 jonas
* fixed allocation of ecx for shl * fixed stupid error in previous commit :/
Revision 1.1 2000/10/15 09:33:32 peter Revision 1.1 2000/10/15 09:33:32 peter
* moved n386*.pas to i386/ cpu_target dir * moved n386*.pas to i386/ cpu_target dir