瀏覽代碼

* 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 12 年之前
父節點
當前提交
9b1a36fcdb
共有 1 個文件被更改,包括 7 次插入7 次删除
  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;