paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-26 13:31:27 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed FpGetRLimit and FpUGetRLimit

Browse Source 
git-svn-id: trunk@2093 -
This commit is contained in:
Jonas Maebe 2005-12-31 13:52:38 +00:00
parent a11a177469
commit c945b972c4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/linux/ossysc.inc
View File

@ -476,7 +476,7 @@ end;
function FpGetRLimit(resource : cInt; rlim : PRLimit) : cInt; function FpGetRLimit(resource : cInt; rlim : PRLimit) : cInt;
begin begin
FpGetRLimit := do_syscall(syscall_nr_getrlimit, FpGetRLimit := do_syscall(syscall_nr_getrlimit,
TSysParam(resource), TSysParam(@rlim)); TSysParam(resource), TSysParam(rlim));
end; end;
{$ifdef HAS_UGETRLIMIT} {$ifdef HAS_UGETRLIMIT}
@ -484,6 +484,6 @@ function fpugetrlimit(resource : cInt; rlim : PRLimit) : cInt;
begin begin
FpUGetRLimit := do_syscall(syscall_nr_ugetrlimit, FpUGetRLimit := do_syscall(syscall_nr_ugetrlimit,
syscall_nr_getrlimit, syscall_nr_getrlimit,
TSysParam(resource), TSysParam(@rlim)); TSysParam(resource), TSysParam(rlim));
end; end;
{$endif} {$endif}