Переглянути джерело

* free the temporary assembler writer created for writing the code of pure
assembler routines

git-svn-id: trunk@34887 -

Jonas Maebe 8 роки тому
батько
коміт
bdfd588b47
1 змінених файлів з 1 додано та 0 видалено
  1. 1 0
      compiler/llvm/agllvm.pas

+ 1 - 0
compiler/llvm/agllvm.pas

@@ -1295,6 +1295,7 @@ implementation
                 a.WriteTree(current_asmdata.asmlists[hal]);
                 writer.decorator:=nil;
                 decorator.free;
+                a.free;
               end;
             writer.AsmWriteLn(asminfo^.comment+'End asmlist '+AsmlistTypeStr[hal]);
           end;