Browse Source

* fixed a_param_ref for large parameters

git-svn-id: trunk@2854 -
Jonas Maebe 19 years ago
parent
commit
20160f1a35
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/cgobj.pas

+ 1 - 1
compiler/cgobj.pas

@@ -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);