瀏覽代碼

+ add fdatasync syscalls for linux

git-svn-id: trunk@12108 -
micha 17 年之前
父節點
當前提交
2a1fc6723a
共有 2 個文件被更改,包括 6 次插入0 次删除
  1. 5 0
      rtl/linux/unxsysc.inc
  2. 1 0
      rtl/linux/unxsysch.inc

+ 5 - 0
rtl/linux/unxsysc.inc

@@ -29,6 +29,11 @@ begin
   fpstatfs:=do_SysCall(SysCall_nr_statfs,TSysParam(path),TSysParam(Info))
 end;
 
+Function  fpfdatasync (fd : cint) : cint;
+begin
+  fpfdatasync:=do_SysCall(syscall_nr_fdatasync, fd);
+end;
+
 Function  fpfsync (fd : cint) : cint;
 
 begin

+ 1 - 0
rtl/linux/unxsysch.inc

@@ -18,6 +18,7 @@ function fpgettimeofday(tp: ptimeval;tzp:ptimezone):cint; external name 'FPC_SYS
 function  fpfStatFS (Fd: cint; Info:pstatfs):cint;
 function  fpStatFS  (Path:pchar; Info:pstatfs):cint;
 function  fpfsync (fd : cint) : cint;
+function  fpfdatasync (fd : cint) : cint;
 Function  fpFlock   (fd,mode : cint)   : cint ;