1 #define PERL_NO_GET_CONTEXT
9 #if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32)
13 #if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32)
18 /* This comment is a kludge to get metaconfig to see the symbols
23 and include the appropriate metaconfig unit
24 so that Configure will test how to turn on non-blocking I/O
25 for a file descriptor. See config.h for how to use these
28 While I'm at it, I'll have metaconfig look for HAS_POLL too.
35 croak("%s not implemented on this architecture", s);
40 constant(char *name, int arg)
45 if (strnEQ(name, "F_", 2)) {
46 if (strEQ(name, "F_DUPFD"))
52 if (strEQ(name, "F_EXLCK"))
58 if (strEQ(name, "F_GETFD"))
64 if (strEQ(name, "F_GETFL"))
70 if (strEQ(name, "F_GETLK"))
76 if (strEQ(name, "F_GETLK64"))
82 if (strEQ(name, "F_GETOWN"))
88 if (strEQ(name, "F_POSIX"))
94 if (strEQ(name, "F_RDLCK"))
100 if (strEQ(name, "F_SETFD"))
106 if (strEQ(name, "F_SETFL"))
112 if (strEQ(name, "F_SETLK"))
118 if (strEQ(name, "F_SETLK64"))
124 if (strEQ(name, "F_SETLKW"))
130 if (strEQ(name, "F_SETLKW64"))
136 if (strEQ(name, "F_SETOWN"))
142 if (strEQ(name, "F_SHLCK"))
148 if (strEQ(name, "F_UNLCK"))
154 if (strEQ(name, "F_WRLCK"))
163 if (strEQ(name, "FAPPEND"))
169 if (strEQ(name, "FASYNC"))
175 if (strEQ(name, "FCREAT"))
181 if (strEQ(name, "FD_CLOEXEC"))
187 if (strEQ(name, "FDEFER"))
193 if (strEQ(name, "FEXCL"))
199 if (strEQ(name, "FNDELAY"))
205 if (strEQ(name, "FNONBLOCK"))
211 if (strEQ(name, "FSYNC"))
217 if (strEQ(name, "FTRUNC"))
225 if (strnEQ(name, "LOCK_", 5)) {
226 /* We support flock() on systems which don't have it, so
227 always supply the constants. */
228 if (strEQ(name, "LOCK_SH"))
234 if (strEQ(name, "LOCK_EX"))
240 if (strEQ(name, "LOCK_NB"))
246 if (strEQ(name, "LOCK_UN"))
256 if (strnEQ(name, "O_", 2)) {
257 if (strEQ(name, "O_ACCMODE"))
263 if (strEQ(name, "O_APPEND"))
269 if (strEQ(name, "O_ASYNC"))
275 if (strEQ(name, "O_BINARY"))
281 if (strEQ(name, "O_CREAT"))
287 if (strEQ(name, "O_DEFER"))
293 if (strEQ(name, "O_DSYNC"))
299 if (strEQ(name, "O_EXCL"))
305 if (strEQ(name, "O_EXLOCK"))
311 if (strEQ(name, "O_LARGEFILE"))
317 if (strEQ(name, "O_NDELAY"))
323 if (strEQ(name, "O_NOCTTY"))
329 if (strEQ(name, "O_NONBLOCK"))
335 if (strEQ(name, "O_RDONLY"))
341 if (strEQ(name, "O_RDWR"))
347 if (strEQ(name, "O_RSYNC"))
353 if (strEQ(name, "O_SHLOCK"))
359 if (strEQ(name, "O_SYNC"))
365 if (strEQ(name, "O_TEXT"))
371 if (strEQ(name, "O_TRUNC"))
377 if (strEQ(name, "O_WRONLY"))
396 MODULE = Fcntl PACKAGE = Fcntl