From ec3aa1f56aa33c6fcf871c848335f7a17710a3ed Mon Sep 17 00:00:00 2001 From: marco Date: Sat, 11 Mar 2017 16:23:02 +0000 Subject: [PATCH] * change sysctl name parameter type to pcint as per manpage. Param names already conform to manual page names, so not changed mantis #31515 git-svn-id: trunk@35566 - --- rtl/bsd/sysctl.pp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/rtl/bsd/sysctl.pp b/rtl/bsd/sysctl.pp index 2480d93169..49ce4c7f66 100644 --- a/rtl/bsd/sysctl.pp +++ b/rtl/bsd/sysctl.pp @@ -81,11 +81,11 @@ TYPE CtlNameRec = Record // {$ifdef FPC_USE_LIBC} -function FPsysctl (Name: pchar; namelen:cuint; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; cdecl; external name 'sysctl'; +function FPsysctl (Name: pcint; namelen:cuint; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; cdecl; external name 'sysctl'; function FPsysctlbyname (Name: pchar; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; cdecl; external name 'sysctlbyname'; function FPsysctlnametomib (Name: pchar;mibp:pcint;sizep:psize_t):cint; cdecl; external name 'sysctlnametomib'; {$else} -function FPsysctl (Name: pchar; namelen:cuint; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; +function FPsysctl (Name: pcint; namelen:cuint; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; function FPsysctlbyname (Name: pchar; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; function FPsysctlnametomib (Name: pchar; mibp:pcint;sizep:psize_t):cint; {$endif} @@ -101,7 +101,7 @@ Uses Syscall; CONST syscall_nr___sysctl = 202; {$endif} -function FPsysctl (Name: pchar; namelen:cuint; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; +function FPsysctl (Name: pcint; namelen:cuint; oldp:pointer;oldlenp:psize_t; newp:pointer;newlen:size_t):cint; Begin if (name[0] <> chr(CTL_USER)) Then