Changeset 46 for trunk/Compiler/UTarget.pas

Timestamp:

Mar 4, 2012, 10:35:47 AM (13 years ago)

Author:

chronos

Message:

• Fixed: Memory leaks in TCompiler and TTarget.

File:

• trunk/Compiler/UTarget.pas (modified) (2 diffs)

trunk/Compiler/UTarget.pas

@@ -19 +19 @@
     Executor: TExecutor;
     constructor Create; virtual;
+    destructor Destroy; override;
   end;
 
@@ -37 +38 @@
 end;
 
+destructor TTarget.Destroy;
+begin
+  Producer.Free;
+  Executor.Free;
+  inherited Destroy;
+end;
+
 { TListTarget }