浏览代码

* 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;