Explorar o código

Fix compilation after commit 35566: change sysctl name parameter type to pcint

git-svn-id: trunk@35573 -
pierre %!s(int64=8) %!d(string=hai) anos
pai
achega
7853c23a0e
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      rtl/bsd/sysctl.pp

+ 1 - 1
rtl/bsd/sysctl.pp

@@ -104,7 +104,7 @@ CONST  syscall_nr___sysctl                    = 202;
 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
+        if (name[0] <> CTL_USER) Then
            exit(do_syscall(syscall_nr___sysctl,TSysParam(name), namelen, TSysParam(oldp), TSysParam(oldlenp), TSysParam(newp), TSysParam(newlen)))
         else
          Exit(0);