paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 18:29:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed overflow in case of op_const64_reg_reg_reg(sub,low(int64),...)

Browse Source 
git-svn-id: trunk@5821 -
This commit is contained in:
Jonas Maebe 2007-01-05 21:27:27 +00:00
parent efd1e86418
commit 85289e80ce
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/powerpc/cgcpu.pas
View File

@ -2248,7 +2248,8 @@ const
end;
OP_ADD, OP_SUB:
begin
if (value < 0) then
if (value < 0) and
(value <> low(value)) then
begin
if op = OP_ADD then
op := OP_SUB