Преглед изворни кода

* fixed calling procvars with copyout parameters

git-svn-id: branches/jvmbackend@18733 -
Jonas Maebe пре 14 година
родитељ
комит
6fe124507e
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      compiler/symcreat.pas

+ 1 - 1
compiler/symcreat.pas

@@ -744,7 +744,7 @@ implementation
             end;
           { var/out/constref parameters -> pass address through (same for
             implicit pointer types) }
-          if paramanager.push_addr_param(pvs.varspez,paradef,procvar.proccalloption) or
+          if paramanager.push_copyout_param(pvs.varspez,paradef,procvar.proccalloption) or
              jvmimplicitpointertype(paradef) then
             begin
               paraname:='@'+paraname;