paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 21:33:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Added more open constants from kernel sources

Browse Source
This commit is contained in:
michael 2000-05-18 20:06:31 +00:00
parent 34e840268a
commit 72076e2e89
1 changed files with 20 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
rtl/linux/sysconst.inc
View File

@ -19,18 +19,22 @@ Const
Seek_Cur = 1; Seek_Cur = 1;
Seek_End = 2; Seek_End = 2;
{ Things for OPEN call - after linux/fcntl.h } { Things for OPEN call - after linux/fcntl.h }
Open_Accmode = 3; Open_Accmode = 3;
Open_RdOnly = 0; Open_RdOnly = 0;
Open_WrOnly = 1; Open_WrOnly = 1;
Open_RdWr = 2; Open_RdWr = 2;
Open_Creat = 1 shl 6; Open_Creat = 1 shl 6;
Open_Excl = 2 shl 6; Open_Excl = 2 shl 6;
Open_NoCtty = 4 shl 6; Open_NoCtty = 4 shl 6;
Open_Trunc = 1 shl 9; Open_Trunc = 1 shl 9;
Open_Append = 2 shl 9; Open_Append = 2 shl 9;
Open_NonBlock = 4 shl 9; Open_NonBlock = 4 shl 9;
Open_NDelay = Open_NonBlock; Open_NDelay = Open_NonBlock;
Open_Sync = 1 shl 12; Open_Sync = 1 shl 12;
Open_Direct = 4 shl 12;
Open_LargeFile = 1 shl 15;
Open_Directory = 2 shl 15;
Open_NoFollow = 4 shl 15;
{ The waitpid uses the following options:} { The waitpid uses the following options:}
Wait_NoHang = 1; Wait_NoHang = 1;
Wait_UnTraced = 2; Wait_UnTraced = 2;
@ -79,7 +83,10 @@ Const
{ {
$Log$ $Log$
Revision 1.5 2000-02-09 16:59:32 peter Revision 1.6 2000-05-18 20:06:31 michael
+ Added more open constants from kernel sources
Revision 1.5 2000/02/09 16:59:32 peter
* truncated log * truncated log
Revision 1.4 2000/01/07 16:41:41 daniel Revision 1.4 2000/01/07 16:41:41 daniel