mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-16 11:59:27 +02:00
- removed imul support from -dfoldarithops since "imull [reg32],[mem32]"
doesn't exist (merged from fixes branch)
This commit is contained in:
parent
1b3b30ffce
commit
d446128ceb
@ -1588,11 +1588,9 @@ function isFoldableArithOp(hp1: paicpu; reg: tregister): boolean;
|
|||||||
begin
|
begin
|
||||||
IsFoldableArithOp := False;
|
IsFoldableArithOp := False;
|
||||||
case hp1^.opcode of
|
case hp1^.opcode of
|
||||||
A_ADD,A_SUB,A_OR,A_XOR,A_AND,A_SHL,A_SHR,A_SAR,A_IMUL:
|
A_ADD,A_SUB,A_OR,A_XOR,A_AND,A_SHL,A_SHR,A_SAR:
|
||||||
isFoldableArithOp :=
|
isFoldableArithOp :=
|
||||||
((paicpu(hp1)^.oper[0].typ = top_reg) or
|
(paicpu(hp1)^.oper[0].typ in [top_reg,top_const]) and
|
||||||
((paicpu(hp1)^.oper[0].typ = top_const) and
|
|
||||||
(hp1^.opcode <> A_IMUL))) and
|
|
||||||
(paicpu(hp1)^.oper[1].typ = top_reg) and
|
(paicpu(hp1)^.oper[1].typ = top_reg) and
|
||||||
(paicpu(hp1)^.oper[1].reg = reg);
|
(paicpu(hp1)^.oper[1].reg = reg);
|
||||||
A_INC,A_DEC:
|
A_INC,A_DEC:
|
||||||
@ -1947,7 +1945,11 @@ End.
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.5 2000-07-28 13:56:23 jonas
|
Revision 1.6 2000-07-31 08:44:05 jonas
|
||||||
|
- removed imul support from -dfoldarithops since "imull [reg32],[mem32]"
|
||||||
|
doesn't exist (merged from fixes branch)
|
||||||
|
|
||||||
|
Revision 1.5 2000/07/28 13:56:23 jonas
|
||||||
* fixed bug in shr/shl optimization when -Og is used (merged from fixes
|
* fixed bug in shr/shl optimization when -Og is used (merged from fixes
|
||||||
branch)
|
branch)
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user