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

* fixed a_param_ref for large parameters

Browse Source 
git-svn-id: trunk@2854 -
This commit is contained in:
Jonas Maebe 2006-03-11 13:54:20 +00:00
parent 6e58ad4a12
commit 20160f1a35
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/cgobj.pas
View File

@ -817,7 +817,7 @@ implementation
ref.offset:=cgpara.location^.reference.offset; ref.offset:=cgpara.location^.reference.offset;
{ use concatcopy, because it can also be a float which fails when { use concatcopy, because it can also be a float which fails when
load_ref_ref is used } load_ref_ref is used }
g_concatcopy(list,r,ref,tcgsize2size[size]); g_concatcopy(list,r,ref,cgpara.intsize);
end end
else else
internalerror(2002071004); internalerror(2002071004);