2
0
Эх сурвалжийг харах

* fixed recording caught exceptions on the exception stack in
FPC_psabi_begin_catchh

git-svn-id: branches/debug_eh@40341 -

Jonas Maebe 6 жил өмнө
parent
commit
e2664e5c30
1 өөрчлөгдсөн 1 нэмэгдсэн , 1 устгасан
  1. 1 1
      rtl/inc/psabieh.inc

+ 1 - 1
rtl/inc/psabieh.inc

@@ -836,7 +836,7 @@ function FPC_psabi_begin_catch(exc:PFPC_Unwind_Exception): pointer; cdecl; compi
     if _ExceptObjectStack<>ExceptWrapper then
       begin
         ExceptWrapper^.Next:=_ExceptObjectStack;
-        _ExceptObjectStack:=ExceptWrapper;
+        ExceptObjectStack:=ExceptWrapper;
       end;
 
     result:= ExceptWrapper^.FObject;