Browse Source

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

git-svn-id: trunk@34887 -

Jonas Maebe 8 năm trước cách đây
mục cha
commit
bdfd588b47
1 tập tin đã thay đổi với 1 bổ sung0 xóa
  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;