Pārlūkot izejas kodu

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

git-svn-id: trunk@33989 -

Jonas Maebe 9 gadi atpakaļ
vecāks
revīzija
4121facc7a
1 mainītis faili ar 2 papildinājumiem un 1 dzēšanām
  1. 2 1
      compiler/symtable.pas

+ 2 - 1
compiler/symtable.pas

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