fpc/packages/base/libc/swaith.inc
2005-02-14 17:13:06 +00:00

35 lines
1.6 KiB
PHP

type
Pidtype_t = ^idtype_t;
idtype_t = (P_ALL,P_PID,P_PGID);
{ // used to be three constants. Why borland decided to change this is a total mystery...
Const
P_ALL = 0;
P_PID = 1;
P_PGID = 2;
}
const
WAIT_ANY = -(1);
WAIT_MYPGRP = 0;
function wait(__stat_loc:PLongint):__pid_t;cdecl;external clib name 'wait';
function waitpid(__pid:__pid_t; __stat_loc:Plongint; __options:longint):__pid_t;cdecl;external clib name 'waitpid';
function waitid(__idtype:idtype_t; __id:__id_t; __infop:Psiginfo_t; __options:longint):longint;cdecl;external clib name 'waitid';
function wait3(__stat_loc: Plongint; __options:longint; __usage:Prusage):__pid_t;cdecl;external clib name 'wait3';
function wait4(__pid:__pid_t; __stat_loc: Plongint; __options:longint; __usage:Prusage):__pid_t;cdecl;external clib name 'wait4';
{ ---------------------------------------------------------------------
Borland compatibility types
---------------------------------------------------------------------}
// Type
function wait(var __stat_loc: Longint):__pid_t;cdecl;external clib name 'wait';
function waitpid(__pid:__pid_t; var __stat_loc:longint; __options:longint):__pid_t;cdecl;external clib name 'waitpid';
function waitid(__idtype:idtype_t; __id:__id_t; var __infop: siginfo_t; __options:longint):longint;cdecl;external clib name 'waitid';
function wait3(var __stat_loc: longint; __options:longint; var __usage:rusage):__pid_t;cdecl;external clib name 'wait3';
function wait4(__pid:__pid_t; var __stat_loc: longint; __options:longint; var __usage: rusage):__pid_t;cdecl;external clib name 'wait4';