Przeglądaj źródła

* fixed memleak with derefdata

peter 22 lat temu
rodzic
commit
621f992afa
1 zmienionych plików z 5 dodań i 1 usunięć
  1. 5 1
      compiler/fmodule.pas

+ 5 - 1
compiler/fmodule.pas

@@ -465,6 +465,7 @@ implementation
 {$ifdef MEMDEBUG}
 {$ifdef MEMDEBUG}
         d:=tmemdebug.create(modulename^+' - symtable');
         d:=tmemdebug.create(modulename^+' - symtable');
 {$endif}
 {$endif}
+        derefdata.free;
         if assigned(globalsymtable) then
         if assigned(globalsymtable) then
           globalsymtable.free;
           globalsymtable.free;
         if assigned(localsymtable) then
         if assigned(localsymtable) then
@@ -690,7 +691,10 @@ implementation
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.41  2003-10-23 14:44:07  peter
+  Revision 1.42  2003-11-23 17:23:49  peter
+    * fixed memleak with derefdata
+
+  Revision 1.41  2003/10/23 14:44:07  peter
     * splitted buildderef and buildderefimpl to fix interface crc
     * splitted buildderef and buildderefimpl to fix interface crc
       calculation
       calculation