Quellcode durchsuchen

* fixed frames memory leak when freeing an exception with psabieh

git-svn-id: branches/debug_eh@40368 -
Jonas Maebe vor 6 Jahren
Ursprung
Commit
8153aa1d00
1 geänderte Dateien mit 2 neuen und 0 gelöschten Zeilen
  1. 2 0
      rtl/inc/psabieh.inc

+ 2 - 0
rtl/inc/psabieh.inc

@@ -746,6 +746,8 @@ procedure FPC_psabieh_ExceptionCleanUp(reason: FPC_Unwind_Reason_Code; exc:PFPC_
     ExceptWrapper:=FPC_psabieh_GetExceptionWrapper(exc);
     ExceptWrapper^.FObject.free;
     ExceptWrapper^.FObject:=nil;
+    if assigned(ExceptWrapper^.frames) then
+      freemem(ExceptWrapper^.frames);
     Dispose(ExceptWrapper);
   end;