Browse Source

* don't add empty symtables when specializing generics

git-svn-id: trunk@8066 -
florian 18 years ago
parent
commit
2b2c6f7f53
1 changed files with 4 additions and 2 deletions
  1. 4 2
      compiler/psub.pas

+ 4 - 2
compiler/psub.pas

@@ -1810,8 +1810,10 @@ implementation
             symtablestack.push(pu.u.globalsymtable);
             pu:=tused_unit(pu.next);
           end;
-        symtablestack.push(hmodule.globalsymtable);
-        symtablestack.push(hmodule.localsymtable);
+        if assigned(hmodule.globalsymtable) then
+          symtablestack.push(hmodule.globalsymtable);
+        if assigned(hmodule.localsymtable) then
+          symtablestack.push(hmodule.localsymtable);
 
         { definitions }
         for i:=0 to tobjectdef(ttypesym(p).typedef).symtable.DefList.Count-1 do