Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-devel / 2002-07

fpc v1.1 tinputline solution

2 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Sergey Korshunoff

Hi!

I solved a tinputline problem (using by tscanner a destroyed object) by the following patch (do not destroy tinputfilemanager in tmodule.reset()):

diff -urN FPC-MY-1.old/fpc/compiler/fmodule.pas
FPC-MY-1/fpc/compiler/fmodule.pas
--- FPC-MY-1.old/fpc/compiler/fmodule.pas	Sun Jul  7 15:34:23 2002
+++ FPC-MY-1/fpc/compiler/fmodule.pas	Sun Jul  7 04:44:15 2002
@@ -495,8 +495,8 @@
            dispose(map);
            map:=nil;
          end;
-        sourcefiles.free;
-        sourcefiles:=tinputfilemanager.create;
+        // sourcefiles.free;
+        // sourcefiles:=tinputfilemanager.create;
         imports.free;
         imports:=tlinkedlist.create;
         _exports.free;

Regards,
Sergey Korshunoff

Reply by email

Jonas Maebe
to Sergey Korshunoff
Sergey Korshunoff wrote
I solved a tinputline problem (using by tscanner a destroyed object) by the following patch (do not destroy tinputfilemanager in tmodule.reset()):

I'd like to wait until Peter has been able to have a look at this, since I'm not sure whether it's completely correct. I have committed your patches for the memory leaks already though, thanks!

Jonas

Reply by email