* now generic

rtl/unix/sysdeclh.inc

@@ -0,0 +1,52 @@
+{
+    $Id$
+    This file is part of the Free Pascal run time library.
+    Copyright (c) 2001 by Free Pascal development team
+
+    Headers of syscalls, for "invisible" imports. Default shared,
+    but can be overriden by not using a standard bunxmain.inc
+
+    See the file COPYING.FPC, included in this distribution,
+    for details about the copyright.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ ***********************************************************************}
+
+function fptime		(var tloc:time_t): time_t; external name 'FPC_SYSC_TIME';
+function fpopen		(path: pchar; flags : cint; mode: TMode):cint;  external name 'FPC_SYSC_OPEN';
+function fpclose	(fd : cint): cint;  external name 'FPC_SYSC_CLOSE';
+function fplseek	(fd : cint; offset : TOff; whence : cint): TOff; external name 'FPC_SYSC_LSEEK';
+function fpread		(fd: cint; buf: pchar; nbytes : TSize): TSSize; external name 'FPC_SYSC_READ';
+function fpwrite	(fd: cint; buf:pchar; nbytes : TSize): TSSize;  external name 'FPC_SYSC_WRITE';
+function fpunlink	(path: pchar): cint;  external name 'FPC_SYSC_UNLINK';
+function fprename	(old : pchar; newpath: pchar): cint;  external name 'FPC_SYSC_RENAME';
+function fpstat		(path: pchar; var buf : stat):cint;  external name 'FPC_SYSC_STAT';
+function fpchdir	(path : pchar): cint; external name 'FPC_SYSC_CHDIR';
+function fpmkdir	(path : pchar; mode: TMode):cint; external name 'FPC_SYSC_MKDIR';
+function fprmdir	(path : pchar): cint; external name 'FPC_SYSC_RMDIR';
+function fpopendir	(dirname : pchar): pdir; external name 'FPC_SYSC_OPENDIR';
+function fpclosedir	(var dirp : dir): cint; external name 'FPC_SYSC_CLOSEDIR';
+function fpreaddir	(var dirp : dir) : pdirent; external name 'FPC_SYSC_READDIR';
+procedure fpexit	(status : cint); external name 'FPC_SYSC_EXIT';
+function fpsigaction	(sig: cint; act : psigactionrec; oact : psigactionrec): cint;  external name 'FPC_SYSC_SIGACTION';
+function fpftruncate	(fd : cint; flength : TOff): cint; external name 'FPC_SYSC_FTRUNCATE';
+function fpfstat	(fd : cint; var sb : stat): cint; external name 'FPC_SYSC_FSTAT';
+function fpfork       : pid_t; external name 'FPC_SYSC_FORK';
+// function fpexecve	(path : pchar; argv : ppchar;envp: ppchar): cint; external name 'FPC_SYSC_EXECVE';
+function fpwaitpid	(pid : pid_t; var stat_loc : cint; options: cint): pid_t; external name 'FPC_SYSC_WAITPID';
+function fpaccess	(pathname : pchar; amode : cint): cint;external name 'FPC_SYSC_ACCESS';
+function fpDup		(fildes:cint):cint;  external name 'FPC_SYSC_DUP';
+function fpDup2		(fildes:cint;fildes2:cint):cint; external name 'FPC_SYSC_DUP2';
+function geterrno     : cint; external name  'FPC_SYS_GETERRNO';
+procedure seterrno 	(i:cint); external name  'FPC_SYS_SETERRNO';
+
+{
+  $Log$
+  Revision 1.1  2003-06-01 15:25:14  marco
+   * now generic
+
+
+}