Prechádzať zdrojové kódy

* renamed FPC_USE_PSEABIEH to FPC_USE_PSABIEH

git-svn-id: branches/debug_eh@40400 -
Jonas Maebe 6 rokov pred
rodič
commit
3cfad8fba8
3 zmenil súbory, kde vykonal 6 pridanie a 6 odobranie
  1. 1 1
      rtl/inc/except.inc
  2. 1 1
      rtl/inc/excepth.inc
  3. 4 4
      rtl/inc/objpash.inc

+ 1 - 1
rtl/inc/except.inc

@@ -26,7 +26,7 @@ Var
   ExceptObjectStack : PExceptObject;
   ExceptTryLevel    : ObjpasInt;
 
-{$ifdef FPC_USE_PSEABIEH}
+{$ifdef FPC_USE_PSABIEH}
 {$i psabieh.inc}
 {$endif}
 

+ 1 - 1
rtl/inc/excepth.inc

@@ -12,7 +12,7 @@
 
  **********************************************************************}
 
-{$if defined(FPC_USE_PSEABIEH)}
+{$if defined(FPC_USE_PSABIEH)}
 {$i psabiehh.inc}
 {$endif}
 

+ 4 - 4
rtl/inc/objpash.inc

@@ -339,7 +339,7 @@
        PPDispatch = ^PDispatch;
        PInterface = PUnknown;
 
-{$ifdef FPC_USE_PSEABIEH}
+{$ifdef FPC_USE_PSABIEH}
        { needed here for TExceptObject (rest is in psabiehh.inc) }
        FPC_Unwind_Reason_Code = longint; {cint}
        FPC_Unwind_Action = longint; {cint}
@@ -355,7 +355,7 @@
          private_1: ptruint;
          private_2: ptruint;
        end;
-{$endif FPC_USE_PSEABIEH}
+{$endif FPC_USE_PSABIEH}
 
        TExceptProc = Procedure (Obj : TObject; Addr : CodePointer; FrameCount:Longint; Frame: PCodePointer);
 
@@ -373,14 +373,14 @@
          ExceptRec  : Pointer;
          ReraiseBuf : jmp_buf;
 {$endif FPC_USE_WIN32_SEH}
-{$ifdef FPC_USE_PSEABIEH}
+{$ifdef FPC_USE_PSABIEH}
          { cached info from unwind phase for action phase }
          handler_switch_value: longint;
          language_specific_data: PByte;
          landing_pad: PtrUInt;
          { libunwind exception handling data (must be last!) }
          unwind_exception: FPC_Unwind_Exception;
-{$endif FPC_USE_PSEABIEH}
+{$endif FPC_USE_PSABIEH}
        end;
 
     Const