mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-23 08:49:38 +02:00
* fixed compilation with -O3 (one false positive, one real error)
git-svn-id: trunk@40155 -
This commit is contained in:
parent
5951a3c0ce
commit
1a9eb77698
@ -444,6 +444,8 @@ uses cutils, cclasses;
|
||||
(opcode in [A_FSGNJ_S,A_FSGNJ_D]) and
|
||||
(oper[0]^.reg=oper[1]^.reg) and
|
||||
(oper[0]^.reg=oper[2]^.reg);
|
||||
else
|
||||
result:=false;
|
||||
end;
|
||||
end;
|
||||
|
||||
|
@ -156,6 +156,7 @@ implementation
|
||||
|
||||
if (nodetype = modn) then
|
||||
begin
|
||||
overflowlabel:=nil;
|
||||
if not no_overflow then
|
||||
begin
|
||||
current_asmdata.getjumplabel(overflowlabel);
|
||||
|
Loading…
Reference in New Issue
Block a user