paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 23:50:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

asm-generic syscalls only selectively include nr_renameat. Instead nr_renameat2 seems to be the new default.

Browse Source 
git-svn-id: branches/laksen/riscv_new@39795 -
This commit is contained in:
Jeppe Johansen 2018-09-22 12:34:48 +00:00
parent 8f4173c54d
commit 2b4532d3fa
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
rtl/linux/osdefs.inc
View File

@ -88,6 +88,7 @@
{$ifdef cpuaarch64} {$ifdef cpuaarch64}
{$define generic_linux_syscalls} {$define generic_linux_syscalls}
{$undef usestime} {$undef usestime}
{$define userenameat}
{$endif cpuaarch64} {$endif cpuaarch64}
{$ifdef cpusparc64} {$ifdef cpusparc64}

6
rtl/linux/ossysc.inc
View File

@ -100,7 +100,11 @@ function Fprename(old : pchar; newpath: pchar): cint; [public, alias : 'FPC_SYSC
begin begin
{$if defined(generic_linux_syscalls)} {$if defined(generic_linux_syscalls)}
Fprename:=do_syscall(syscall_nr_renameat,AT_FDCWD,TSysParam(old),AT_FDCWD,TSysParam(newpath)); {$if defined(userenameat)}
Fprename:=do_syscall(syscall_nr_renameat,AT_FDCWD,TSysParam(old),AT_FDCWD,TSysParam(newpath));
{$else}
Fprename:=do_syscall(syscall_nr_renameat2,AT_FDCWD,TSysParam(old),AT_FDCWD,TSysParam(newpath),0);
{$endif}
{$else} {$else}
Fprename:=do_syscall(syscall_nr_rename,TSysParam(old),TSysParam(newpath)); Fprename:=do_syscall(syscall_nr_rename,TSysParam(old),TSysParam(newpath));
{$endif} {$endif}