mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 14:49:17 +02:00
* changed ExceptTryLevel from nativeint to objpasint
git-svn-id: trunk@27234 -
This commit is contained in:
parent
531c2d79e0
commit
ff6b258379
@ -47,7 +47,7 @@ Var
|
|||||||
{$endif FPC_HAS_FEATURE_THREADING}
|
{$endif FPC_HAS_FEATURE_THREADING}
|
||||||
ExceptAddrStack : PExceptAddr;
|
ExceptAddrStack : PExceptAddr;
|
||||||
ExceptObjectStack : PExceptObject;
|
ExceptObjectStack : PExceptObject;
|
||||||
ExceptTryLevel : nativeint;
|
ExceptTryLevel : ObjpasInt;
|
||||||
|
|
||||||
Function RaiseList : PExceptObject;
|
Function RaiseList : PExceptObject;
|
||||||
begin
|
begin
|
||||||
|
Loading…
Reference in New Issue
Block a user