Pārlūkot izejas kodu

* call ArSymbols.Free instead of .Destroy in the tarobjectreader destructor
(because .destroy will cause a crash in case the object hasn't been
initialized)

git-svn-id: trunk@30762 -

nickysn 10 gadi atpakaļ
vecāks
revīzija
74c74b6a88
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      compiler/owar.pas

+ 1 - 1
compiler/owar.pas

@@ -342,7 +342,7 @@ implementation
     destructor  tarobjectreader.destroy;
       begin
         inherited closefile;
-        ArSymbols.destroy;
+        ArSymbols.Free;
         if assigned(LFNStrs) then
           FreeMem(LFNStrs);
         inherited Destroy;