paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-02 07:22:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix for snapshot building.

Browse Source
This commit is contained in:
marco 2003-09-18 08:50:48 +00:00
parent 6f78eac09f
commit 4b6df870be
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/catch.pas
View File

@ -106,17 +106,20 @@ begin
{$ifdef has_signal}
NewSignal:=SignalHandler({$ifdef fpcprocvar}@{$endif}CatchSignal);
{$ifndef sunos}
OldSigSegm:={$ifdef VER1_0}Signal{$else}fpSignal{$endif} (SIGSEGV,NewSignal);
OldSigSegm:={$ifdef VER1_0}Signal{$else}{$ifdef Unix}fpSignal{$else}Signal{$endif}{$endif} (SIGSEGV,NewSignal);
{$endif} // lxrun on solaris hooks this for handling linux-calls!
OldSigInt:={$ifdef VER1_0}Signal{$else}fpSignal{$endif} (SIGINT,NewSignal);
OldSigFPE:={$ifdef VER1_0}Signal{$else}fpSignal{$endif} (SIGFPE,NewSignal);
OldSigInt:={$ifdef VER1_0}Signal{$else}{$ifdef Unix}fpSignal{$else}Signal{$endif}{$endif} (SIGINT,NewSignal);
OldSigFPE:={$ifdef VER1_0}Signal{$else}{$ifdef Unix}fpSignal{$else}Signal{$endif}{$endif} (SIGFPE,NewSignal);
{$endif}
{$endif nocatch}
end.
{
$Log$
Revision 1.15 2003-09-14 20:26:18 marco
Revision 1.16 2003-09-18 08:50:48 marco
* fix for snapshot building.
Revision 1.15 2003/09/14 20:26:18 marco
* Unix reform
Revision 1.14 2003/09/05 17:41:12 florian