Browse Source

* only free the llvm shadow symtable when the original symtable will
also be freed

git-svn-id: trunk@33989 -

Jonas Maebe 9 years ago
parent
commit
4121facc7a
1 changed files with 2 additions and 1 deletions
  1. 2 1
      compiler/symtable.pas

+ 2 - 1
compiler/symtable.pas

@@ -1082,7 +1082,8 @@ implementation
     destructor tabstractrecordsymtable.destroy;
       begin
 {$ifdef llvm}
-        fllvmst.free;
+        if refcount=1 then
+          fllvmst.free;
 {$endif llvm}
         inherited destroy;
       end;