paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-18 05:01:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

* added missing getcopy for previous addition

Browse Source
This commit is contained in:
Jonas Maebe 2000-10-15 08:38:46 +00:00
parent 8a381b9ec3
commit 54ce0b8a7d
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/ninl.pas
View File

@ -688,7 +688,7 @@ implementation
hpp := cordconstnode.create(1,s32bitdef);
{ addition/substraction depending on inc/dec }
if inlinenumber = in_inc_x then
hp := caddnode.create(addn,tcallparanode(left).left,hpp)
hp := caddnode.create(addn,tcallparanode(left).left.getcopy,hpp)
else
hp := caddnode.create(subn,tcallparanode(left).left.getcopy,hpp);
{ assign result of addition }
@ -1412,7 +1412,10 @@ begin
end.
{
$Log$
Revision 1.8 2000-10-14 18:27:53 jonas
Revision 1.9 2000-10-15 08:38:46 jonas
* added missing getcopy for previous addition
Revision 1.8 2000/10/14 18:27:53 jonas
* merged fix for inc/dec on 64bit types from tcinl
Revision 1.7 2000/10/14 10:14:50 peter