From fbfaf30c0b952e1c75308282d26e6ff17f98c848 Mon Sep 17 00:00:00 2001 From: michael Date: Tue, 8 Sep 1998 13:01:09 +0000 Subject: [PATCH] Adapted to changed Signal call --- compiler/catch.pas | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) diff --git a/compiler/catch.pas b/compiler/catch.pas index a69e2a1492..92e6d3cbc4 100644 --- a/compiler/catch.pas +++ b/compiler/catch.pas @@ -33,17 +33,13 @@ uses verbose; Var -{$ifdef linux} - NewSignal,OldSigSegm,OldSigInt : PSignalHandler; -{$else} NewSignal,OldSigSegm,OldSigInt : SignalHandler; -{$endif} Implementation {$ifdef linux} -Procedure CatchSignal(Sig : Integer); +Procedure CatchSignal(Sig : Integer);cdecl; {$else} Function CatchSignal(Sig : longint):longint; {$endif} @@ -67,7 +63,7 @@ end; begin {$ifdef linux} - NewSignal:=PSignalHandler(@CatchSignal); + NewSignal:=@CatchSignal; OldSigSegm:=Signal (SIGSEGV,NewSignal); OldSigInt:=Signal (SIGINT,NewSignal); {$else} @@ -79,8 +75,11 @@ end. { $Log$ - Revision 1.1 1998-03-25 11:18:12 root - Initial revision + Revision 1.2 1998-09-08 13:01:09 michael + Adapted to changed Signal call + + Revision 1.1.1.1 1998/03/25 11:18:12 root + * Restored version Revision 1.5 1998/03/10 01:17:15 peter * all files have the same header