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

* fixed bug in op_const_reg_reg() for imul

Browse Source
This commit is contained in:
Jonas Maebe 2002-07-21 16:55:34 +00:00
parent 44f94bdc9d
commit 6cb82a2c8f
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/x86/cgx86.pas
View File

@ -908,7 +908,10 @@ unit cgx86;
if not(cs_check_overflow in aktlocalswitches) and if not(cs_check_overflow in aktlocalswitches) and
ispowerof2(a,power) then ispowerof2(a,power) then
{ can be done with a shift } { can be done with a shift }
inherited a_op_const_reg_reg(list,op,size,a,src,dst); begin
inherited a_op_const_reg_reg(list,op,size,a,src,dst);
exit;
end;
list.concat(taicpu.op_const_reg_reg(A_IMUL,S_L,a,src,dst)); list.concat(taicpu.op_const_reg_reg(A_IMUL,S_L,a,src,dst));
end; end;
OP_ADD, OP_SUB: OP_ADD, OP_SUB:
@ -1661,7 +1664,10 @@ unit cgx86;
end. end.
{ {
$Log$ $Log$
Revision 1.1 2002-07-20 19:28:47 florian Revision 1.2 2002-07-21 16:55:34 jonas
* fixed bug in op_const_reg_reg() for imul
Revision 1.1 2002/07/20 19:28:47 florian
* splitting of i386\cgcpu.pas into x86\cgx86.pas and i386\cgcpu.pas * splitting of i386\cgcpu.pas into x86\cgx86.pas and i386\cgcpu.pas
cgx86.pas will contain the common code for i386 and x86_64 cgx86.pas will contain the common code for i386 and x86_64