Browse Source

- get rid of the FPC_USE_GETDIRENTRIES_I49_SYSCALL define and the
use_openbsd_getdirentries_49 global variable - both are compatibility features
for a no longer supported OpenBSD version

git-svn-id: trunk@41789 -

nickysn 6 years ago
parent
commit
ede50a2c4f
3 changed files with 0 additions and 12 deletions
  1. 0 10
      rtl/bsd/ossysc.inc
  2. 0 1
      rtl/openbsd/setsysnr.inc
  3. 0 1
      rtl/openbsd/sysnr.inc

+ 0 - 10
rtl/bsd/ossysc.inc

@@ -221,7 +221,6 @@ begin
 end;
 
 var
-  use_openbsd_getdirentries_49 : boolean = false;
   use_getdirentries_syscall : boolean = true;
 
 function Fpreaddir(dirp : pdir) : pdirent; [public, alias : 'FPC_SYSC_READDIR'];
@@ -237,19 +236,10 @@ function readbuffer:longint;
 var retval :longint;
 {$ifdef FPC_USE_GETDIRENTRIES_SYSCALL}
     basepp : pointer;
-{$ifdef FPC_USE_GETDIRENTRIES_I49_SYSCALL}
-  { OpenBSD i49 getDirEntries system call uses off_t type for last parameter }
-    basep_off_t : off_t;
-{$endif not FPC_USE_GETDIRENTRIES_I49_SYSCALL}
     basep : clong;
 {$endif FPC_USE_GETDIRENTRIES_SYSCALL}
 begin
 {$ifdef FPC_USE_GETDIRENTRIES_SYSCALL}
-{$ifdef FPC_USE_GETDIRENTRIES_I49_SYSCALL}
- if use_openbsd_getdirentries_49 then
-   basepp:=@basep_off_t
- else
-{$endif FPC_USE_GETDIRENTRIES_I49_SYSCALL}
    basepp:=@basep;
  if use_getdirentries_syscall then
    Retval:=do_syscall(syscall_nr_getdirentries,TSysParam(dirp^.dd_fd),TSysParam(@dirp^.dd_buf^),DIRBLKSIZ {sizeof(getdentsbuffer)},TSysParam(basepp))

+ 0 - 1
rtl/openbsd/setsysnr.inc

@@ -10,7 +10,6 @@
 
 {$ifndef FPC_IS_SYSTEM}
 var
-  use_openbsd_getdirentries_49 : boolean = false;
   use_getdirentries_syscall : boolean = true;
 
 function geterrno:longint; external name 'FPC_SYS_GETERRNO';

+ 0 - 1
rtl/openbsd/sysnr.inc

@@ -260,5 +260,4 @@ var
 
 {$define FPC_HAS_SETSYSNR_INC}
 {$define FPC_USE_GETDIRENTRIES_SYSCALL}
-{$define FPC_USE_GETDIRENTRIES_I49_SYSCALL}