Răsfoiți Sursa

* don't call buildderef for the local symtable of procdefs unless we will
write it to the ppu

git-svn-id: trunk@26083 -

Jonas Maebe 11 ani în urmă
părinte
comite
9b1a36fcdb
1 a modificat fișierele cu 7 adăugiri și 7 ștergeri
  1. 7 7
      compiler/symdef.pas

+ 7 - 7
compiler/symdef.pas

@@ -4926,16 +4926,16 @@ implementation
       begin
          inherited buildderefimpl;
 
-         { Localst is not available for main/unit init }
-         if assigned(localst) then
-           begin
-             tlocalsymtable(localst).buildderef;
-             tlocalsymtable(localst).buildderefimpl;
-           end;
-
          { inline tree }
          if (po_has_inlininginfo in procoptions) then
            begin
+             { Localst is not available for main/unit init }
+             if assigned(localst) then
+               begin
+                 tlocalsymtable(localst).buildderef;
+                 tlocalsymtable(localst).buildderefimpl;
+               end;
+
              funcretsymderef.build(funcretsym);
              inlininginfo^.code.buildderefimpl;
            end;