Browse Source

--- Merging r23223 into '.':
U rtl/bsd/ossysc.inc
U rtl/openbsd/sysnr.inc

# revisions: 23223
r23223 | pierre | 2012-12-26 15:33:30 +0100 (Wed, 26 Dec 2012) | 1 line
Changed paths:
M /trunk/rtl/bsd/ossysc.inc
M /trunk/rtl/openbsd/sysnr.inc

Use new getdirentriesi49 syscall, contributed by Pascal Stumpf

git-svn-id: branches/fixes_2_6@23651 -

marco 12 years ago
parent
commit
476b00769c
2 changed files with 7 additions and 1 deletions
  1. 5 0
      rtl/bsd/ossysc.inc
  2. 2 1
      rtl/openbsd/sysnr.inc

+ 5 - 0
rtl/bsd/ossysc.inc

@@ -223,7 +223,12 @@ with blockmode have this higher?}
 function readbuffer:longint;
 
 var retval :longint;
+{$ifdef USE_GETDIRENTRIES_I49_SYSCALL}
+  { OpenBSD i49 getDirEntries system call uses off_t type for last parameter }
+    basep : off_t;
+{$else not USE_GETDIRENTRIES_I49_SYSCALL}
     basep : clong;
+{$endif not USE_GETDIRENTRIES_I49_SYSCALL}
 begin
 {$ifdef USE_GETDIRENTRIES_SYSCALL}
  Retval:=do_syscall(syscall_nr_getdirentries,TSysParam(dirp^.dd_fd),TSysParam(@dirp^.dd_buf^),DIRBLKSIZ {sizeof(getdentsbuffer)},TSysParam(@basep));

+ 2 - 1
rtl/openbsd/sysnr.inc

@@ -256,8 +256,9 @@ Const
         syscall_nr_MAXSYSCALL   = 313;
 
 { Aliases }
-        syscall_nr_getdirentries = syscall_nr_ogetdirentries;
+        syscall_nr_getdirentries = syscall_nr_getdirentriesi49;
         syscall_nr_waitpid      = syscall_nr_wait4;  // 7, added: ease of notation purposes
 {        syscall_nr_getdents = syscall_nr_getdirentries; }
 {$define USE_GETDIRENTRIES_SYSCALL}
+{$define USE_GETDIRENTRIES_I49_SYSCALL}