blob: 761b509b730ca6fdb1e92605537ce446a9841cd8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
type
TMakeContextProc = procedure; // Used anonymously in header file.
function getcontext(__ucp:Pucontext_t):longint;cdecl;external clib name 'getcontext';
function setcontext(__ucp:Pucontext_t):longint;cdecl;external clib name 'setcontext';
function swapcontext(__oucp:Pucontext_t; __ucp:Pucontext_t):longint;cdecl;external clib name 'swapcontext';
procedure makecontext(__ucp:Pucontext_t; __func:TMakeContextProc; __argc:longint; args:array of const);cdecl;external clib name 'makecontext';
procedure makecontext(__ucp:Pucontext_t; __func:TMakeContextProc; __argc:longint);cdecl;varargs;external clib name 'makecontext';
{ ---------------------------------------------------------------------
Borland compatibility types
---------------------------------------------------------------------}
// Type
function getcontext(var __ucp:ucontext_t):longint;cdecl;external clib name 'getcontext';
function setcontext(const __ucp: ucontext_t):longint;cdecl;external clib name 'setcontext';
function swapcontext(var __oucp:ucontext_t; const __ucp: ucontext_t):longint;cdecl;external clib name 'swapcontext';
procedure makecontext(var __ucp:ucontext_t; __func:TMakeContextProc; __argc:longint; args:array of const);cdecl;external clib name 'makecontext';
procedure makecontext(var __ucp:ucontext_t; __func:TMakeContextProc; __argc:longint);cdecl;external clib name 'makecontext';
|
