mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 20:19:25 +02:00
Minimalist change to avoid Invalid Typecast error on class when compiled with '-CriotR -O2' for i386-go32v2 target
git-svn-id: trunk@43565 -
This commit is contained in:
parent
f7d6192905
commit
c882828fd0
@ -94,6 +94,8 @@ unit aoptcpu;
|
||||
p := tai(p.next);
|
||||
Result:=true;
|
||||
end;
|
||||
if not (p is taicpu) then
|
||||
exit;
|
||||
case taicpu(p).opcode Of
|
||||
A_IMUL:
|
||||
Result:=PrePeepholeOptIMUL(p);
|
||||
|
Loading…
Reference in New Issue
Block a user