summaryrefslogtreecommitdiff
path: root/rtl/bsd
diff options
context:
space:
mode:
authornickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2019-03-24 16:30:50 +0000
committernickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2019-03-24 16:30:50 +0000
commite70762cf75dc0e185450b58241a103946e6fbc54 (patch)
treeb30228e7559e3369a6d10295f4637851d226c802 /rtl/bsd
parent16648acf03b8e097bf0e6122565efd5e3ca9e5aa (diff)
downloadfpc-e70762cf75dc0e185450b58241a103946e6fbc54.tar.gz
- removed the FPC_USE_GETDIRENTRIES_SYSCALL define and use_getdirentries_syscall
global variable, they are compatibility flags of a no longer supported OpenBSD version git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@41790 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/bsd')
-rw-r--r--rtl/bsd/ossysc.inc17
1 files changed, 1 insertions, 16 deletions
diff --git a/rtl/bsd/ossysc.inc b/rtl/bsd/ossysc.inc
index 8df42c51e2..df0317260a 100644
--- a/rtl/bsd/ossysc.inc
+++ b/rtl/bsd/ossysc.inc
@@ -220,9 +220,6 @@ begin
dispose(dirp);
end;
-var
- use_getdirentries_syscall : boolean = true;
-
function Fpreaddir(dirp : pdir) : pdirent; [public, alias : 'FPC_SYSC_READDIR'];
{Different from Linux, Readdir on BSD is based on Getdents, due to the
@@ -234,20 +231,8 @@ with blockmode have this higher?}
function readbuffer:longint;
var retval :longint;
-{$ifdef FPC_USE_GETDIRENTRIES_SYSCALL}
- basepp : pointer;
- basep : clong;
-{$endif FPC_USE_GETDIRENTRIES_SYSCALL}
-begin
-{$ifdef FPC_USE_GETDIRENTRIES_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))
- else
- Retval:=do_syscall(syscall_nr_getdents,TSysParam(dirp^.dd_fd),TSysParam(@dirp^.dd_buf^),DIRBLKSIZ {sizeof(getdentsbuffer)});
-{$else not FPC_USE_GETDIRENTRIES_SYSCALL}
+begin
Retval:=do_syscall(syscall_nr_getdents,TSysParam(dirp^.dd_fd),TSysParam(@dirp^.dd_buf^),DIRBLKSIZ {sizeof(getdentsbuffer)});
-{$endif not FPC_USE_GETDIRENTRIES_SYSCALL}
dirp^.dd_rewind:=TSysParam(dirp^.dd_buf);
if retval=0 then
begin