index aa872b6ca46038a7ca9d3ebdd8097f466df4a490..d3a79dbb4207623b6afd1b8834936c2e03840547 100644 (file)
int64_t* = LONGINT;
u_int64_t* = LONGINT;
wchar_t* = INTEGER;
- sigset_t* = SET;
sigjmp_buf* = ARRAY [untagged] 11 OF INTEGER;
intFlags* = SET;
FILE = ARRAY [untagged] 22 OF INTEGER;
+ sigset_t* = ARRAY [untagged] 4 OF BYTE;
+ PtrSigset_t* = POINTER [untagged] TO sigset_t;
tm* = POINTER TO tmDesc;
(* POSIX.1 *)
PROCEDURE [ccall] stat* (path: PtrSTR; VAR sp: stat_t): int;
+ PROCEDURE [ccall] lseek* (d: int; offset: off_t; whence: int): off_t;
+
+ (* POSIX.1 *)
+ PROCEDURE [ccall] sigsetjmp* (VAR env: sigjmp_buf; savemask: int): int;
+
(* ANSI C 89 *)
PROCEDURE [ccall] clock* (): clock_t;
PROCEDURE [ccall] localtime* (VAR [nil] t: time_t): tm;
(* POSIX.1 *)
+(*
PROCEDURE [ccall] sigsetjmp* (VAR env: sigjmp_buf; savemask: int): int;
+*)
PROCEDURE [ccall] siglongjmp* (VAR env: sigjmp_buf; val: int);
(* POSIX.1 *)
- PROCEDURE [ccall] sigemptyset* (VAR set: sigset_t): int;
- PROCEDURE [ccall] sigfillset* (VAR set: sigset_t): int;
- PROCEDURE [ccall] sigaddset* (VAR set: sigset_t; signo: int): int;
- PROCEDURE [ccall] sigprocmask* (how: int; VAR [nil] set: sigset_t; VAR [nil] oset: sigset_t): int;
+ PROCEDURE [ccall] sigemptyset* (set: PtrSigset_t): int;
+ PROCEDURE [ccall] sigfillset* (set: PtrSigset_t): int;
+ PROCEDURE [ccall] sigaddset* (set: PtrSigset_t; signo: int): int;
+ PROCEDURE [ccall] sigprocmask* (how: int; set: PtrSigset_t; oset: PtrSigset_t): int;
(* POSIX.1 *)
PROCEDURE [ccall] sigaction* (sig: int; VAR [nil] act: sigaction_t; VAR [nil] oact: sigaction_t): int;
(* ANSI C 89, XPG4 *)
PROCEDURE [ccall] fseek* (stream: PtrFILE; offset: long; whence: int): int;
+ (* POSIX.1 *)
+ PROCEDURE [ccall] fileno* (stream: PtrFILE): int;
+
(* POSIX.1 *)
PROCEDURE [ccall] rename* (from, to: PtrSTR): int;
PROCEDURE [ccall] mkdir* (path: PtrSTR; mode: mode_t): int;
PROCEDURE [ccall] write* (d: int; buf: PtrVoid; nbytes: size_t): ssize_t;
PROCEDURE [ccall] read* (d: int; buf: PtrVoid; nbytes: size_t): ssize_t;
PROCEDURE [ccall] close* (d: int): int;
- PROCEDURE [ccall] lseek* (d: int; offset: off_t; whence: int): off_t;
(* POSIX.1 *)
PROCEDURE [ccall] chmod* (path: PtrSTR; mode: mode_t): int;