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

Use BeOS specific version of SigAction procedure declaration type

Browse Source 
git-svn-id: trunk@37281 -
This commit is contained in:
pierre 2017-09-20 16:03:37 +00:00
parent 6f14241e56
commit 9fd998713c
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
packages/fcl-extra/src/unix/daemonapp.inc
View File

@ -208,9 +208,12 @@ end;
{ --------------------------------------------------------------------- { ---------------------------------------------------------------------
Global initialization/Finalization Global initialization/Finalization
---------------------------------------------------------------------} ---------------------------------------------------------------------}
{$ifdef BeOS}
Procedure DoShutDown(Sig : Longint; SigContext: PSigContextRec; uContext : Pvregs);cdecl;
{$else}
Procedure DoShutDown(Sig : Longint; Info : PSigInfo; Context : PSigContext); cdecl; Procedure DoShutDown(Sig : Longint; Info : PSigInfo; Context : PSigContext); cdecl;
{$endif}
begin begin
Application.StopDaemons(True); Application.StopDaemons(True);
Application.Terminate; Application.Terminate;