Przeglądaj źródła

* stupid typo in TVMTWriter.RedirectToEmpty fixed, resolves #23763

git-svn-id: trunk@23569 -
florian 12 lat temu
rodzic
commit
4d3df8f518
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      compiler/nobj.pas

+ 1 - 1
compiler/nobj.pas

@@ -1533,7 +1533,7 @@ implementation
             if (procdef.funcretloc[calleeside].Location^.loc=LOC_FPUREGISTER) then
               exit;
 {$endif x86}
-            procdef.init_paraloc_info(calleeside);
+            procdef.init_paraloc_info(callerside);
             { we can redirect the call if no memory parameter is passed }
             for i:=0 to procdef.paras.count-1 do
               begin