浏览代码

* small rearrangements

marco 22 年之前
父节点
当前提交
cc84ef0e7c
共有 1 个文件被更改,包括 6 次插入31 次删除
  1. 6 31
      rtl/linux/bunxmain.inc

+ 6 - 31
rtl/linux/bunxmain.inc

@@ -22,37 +22,9 @@
 { $I ostypes.inc}
 
 {$ifdef uselibc}
- {$I oscdecl.inc}
+ {$I oscdeclh.inc}
 {$else}
-
-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';
-
+ {$I sysdeclh.inc}
 {$endif}
 
 {$I bunxfunc.inc}
@@ -60,7 +32,10 @@ procedure seterrno 	(i:cint); external name  'FPC_SYS_SETERRNO';
 
 {
  $Log$
- Revision 1.2  2003-01-02 22:39:19  marco
+ Revision 1.3  2003-06-01 16:28:56  marco
+  * small rearrangements
+
+ Revision 1.2  2003/01/02 22:39:19  marco
   * posmacro.inc was still include while it was already moved to bunxmacr.inc
     fixed, will remove posmacro.inc shortly