blob: db21b43fb425e96779b0334ccdd781fe0a5f37d9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
const
SCHED_OTHER = 0;
SCHED_FIFO = 1;
SCHED_RR = 2;
const
CSIGNAL = $000000ff;
CLONE_VM = $00000100;
CLONE_FS = $00000200;
CLONE_FILES = $00000400;
CLONE_SIGHAND = $00000800;
CLONE_PID = $00001000;
CLONE_PTRACE = $00002000;
CLONE_VFORK = $00004000;
type
Psched_param = ^sched_param;
sched_param = record
__sched_priority : longint;
end;
TCloneFunc = function(Arg: Pointer): Integer; cdecl; // For translation
function clone(__fn:tclonefunc; __child_stack:pointer; __flags:longint; __arg:pointer):longint;cdecl;external clib name 'clone';
{ ---------------------------------------------------------------------
Borland compatibility types
---------------------------------------------------------------------}
Type
__sched_param = sched_param;
P__sched_param = ^__sched_param;
TSchedParam = __sched_param;
PSchedParam = ^TSchedParam;
TCloneProc = TCloneFunc;
|
