Explorar o código

* adds fpgetcwd support to sysdir.inc and fixes compilation

git-svn-id: trunk@2969 -
Almindor %!s(int64=19) %!d(string=hai) anos
pai
achega
827abd27d7
Modificáronse 2 ficheiros con 5 adicións e 8 borrados
  1. 0 6
      rtl/linux/bunxsysc.inc
  2. 5 2
      rtl/linux/ossysc.inc

+ 0 - 6
rtl/linux/bunxsysc.inc

@@ -381,12 +381,6 @@ begin
   fptimes:=Do_syscall(syscall_nr_times,TSysParam(@buffer));
 end;
 
-function pfpgetcwd(path : pchar; siz:tsize):pchar;  [public, alias : 'FPC_SYSC_GETCWD'];
-
-begin
-  pfpgetcwd:=pchar(Do_Syscall(Syscall_nr_getcwd,TSysParam(Path),TSysParam(siz)));
-end;
-
 Function fpSelect(N:cint;readfds,writefds,exceptfds:pfdSet;TimeOut:PTimeVal):cint;
 {
   Select checks whether the file descriptor sets in readfs/writefs/exceptfs

+ 5 - 2
rtl/linux/ossysc.inc

@@ -475,8 +475,11 @@ begin
   FpNanoSleep:=Do_SysCall(syscall_nr_nanosleep,TSysParam(req),TSysParam(rem));
 end;
 
-// The following belongs here, but this should be researched more.
-// function Fpgetcwd(pt:pchar; _size:size_t):pchar;[public, alias :'FPC_SYSC_GETCWD'];
+function fpgetcwd(path : pchar; siz:tsize):pchar;  [public, alias : 'FPC_SYSC_GETCWD'];
+
+begin
+  fpgetcwd:=pchar(Do_Syscall(Syscall_nr_getcwd,TSysParam(Path),TSysParam(siz)));
+end;
 
 function fpgettimeofday(tp: ptimeval;tzp:ptimezone):cint; [public, alias: 'FPC_SYSC_GETTIMEOFDAY'];