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

Sparc64 uses the same value as sparc for O_APPEND

Browse Source 
git-svn-id: trunk@36782 -
This commit is contained in:
pierre 2017-07-24 10:01:14 +00:00
parent 6f6139609d
commit 1ff7f061ff
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/linux/ostypes.inc
View File

@ -173,7 +173,7 @@ type
l_start : kernel_off_t; { starting offset } l_start : kernel_off_t; { starting offset }
l_len : kernel_off_t; { len = 0 means until end of file } l_len : kernel_off_t; { len = 0 means until end of file }
l_pid : pid_t; { lock owner } l_pid : pid_t; { lock owner }
{$ifdef cpusparc} {$if defined(cpusparc) or defined(cpusparc64)}
__pad : cshort; __pad : cshort;
{$endif} {$endif}
End; End;
@ -251,7 +251,7 @@ CONST
O_RDONLY = 0; { Open read-only. } O_RDONLY = 0; { Open read-only. }
O_WRONLY = 1; { Open write-only. } O_WRONLY = 1; { Open write-only. }
O_RDWR = 2; { Open read/write. } O_RDWR = 2; { Open read/write. }
{$ifdef cpusparc} {$if defined(cpusparc) or defined(cpusparc64)}
O_APPEND = 8; O_APPEND = 8;
O_CREAT = $200; O_CREAT = $200;
O_TRUNC = $400; O_TRUNC = $400;
@ -263,7 +263,7 @@ CONST
O_DIRECTORY = $10000; O_DIRECTORY = $10000;
O_NOFOLLOW = $20000; O_NOFOLLOW = $20000;
O_DIRECT = $100000; O_DIRECT = $100000;
{$else : not cpusparc} {$else : not (cpusparc or cpusparc64)}
{$ifdef cpumips} {$ifdef cpumips}
O_CREAT = $100; O_CREAT = $100;
O_EXCL = $400; O_EXCL = $400;
@ -289,7 +289,7 @@ CONST
O_DIRECTORY = $10000; O_DIRECTORY = $10000;
O_NOFOLLOW = $20000; O_NOFOLLOW = $20000;
{$endif not cpumips} {$endif not cpumips}
{$endif not cpusparc} {$endif not (cpusparc or cpusparc64)}
AT_FDCWD = -100; AT_FDCWD = -100;
AT_REMOVEDIR = $200; AT_REMOVEDIR = $200;