Explorar o código

* 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 %!s(int64=10) %!d(string=hai) anos
pai
achega
74c74b6a88
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  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;