1 #define PERL_NO_GET_CONTEXT
9 #if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32)
13 #if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32)
22 /* This comment is a kludge to get metaconfig to see the symbols
27 and include the appropriate metaconfig unit
28 so that Configure will test how to turn on non-blocking I/O
29 for a file descriptor. See config.h for how to use these
32 While I'm at it, I'll have metaconfig look for HAS_POLL too.
42 if (strEQ(name, "S_IFMT")) /* Yes, on name _S_IFMT return S_IFMT. */
52 if (strEQ(name, "ALLOCSP"))
58 if (strEQ(name, "ALLOCSP64"))
64 if (strEQ(name, "COMPAT"))
70 if (strEQ(name, "DUP2FD"))
76 if (strEQ(name, "DUPFD"))
82 if (strEQ(name, "EXLCK"))
88 if (strEQ(name, "FREESP"))
94 if (strEQ(name, "FREESP64"))
100 if (strEQ(name, "FSYNC"))
106 if (strEQ(name, "FSYNC64"))
112 if (strEQ(name, "GETFD"))
118 if (strEQ(name, "GETFL"))
124 if (strEQ(name, "GETLK"))
130 if (strEQ(name, "GETLK64"))
136 if (strEQ(name, "GETOWN"))
142 if (strEQ(name, "NODNY"))
148 if (strEQ(name, "POSIX"))
154 if (strEQ(name, "RDACC"))
160 if (strEQ(name, "RDDNY"))
166 if (strEQ(name, "RDLCK"))
172 if (strEQ(name, "RWACC"))
178 if (strEQ(name, "RWDNY"))
184 if (strEQ(name, "SETFD"))
190 if (strEQ(name, "SETFL"))
196 if (strEQ(name, "SETLK"))
202 if (strEQ(name, "SETLK64"))
208 if (strEQ(name, "SETLKW"))
214 if (strEQ(name, "SETLKW64"))
220 if (strEQ(name, "SETOWN"))
226 if (strEQ(name, "SHARE"))
232 if (strEQ(name, "SHLCK"))
238 if (strEQ(name, "UNLCK"))
244 if (strEQ(name, "UNSHARE"))
250 if (strEQ(name, "WRACC"))
256 if (strEQ(name, "WRDNY"))
262 if (strEQ(name, "WRLCK"))
271 if (strEQ(name, "APPEND"))
277 if (strEQ(name, "ASYNC"))
283 if (strEQ(name, "CREAT"))
289 if (strEQ(name, "D_CLOEXEC"))
295 if (strEQ(name, "DEFER"))
301 if (strEQ(name, "DSYNC"))
307 if (strEQ(name, "EXCL"))
313 if (strEQ(name, "LARGEFILE"))
319 if (strEQ(name, "NDELAY"))
325 if (strEQ(name, "NONBLOCK"))
331 if (strEQ(name, "RSYNC"))
337 if (strEQ(name, "SYNC"))
343 if (strEQ(name, "TRUNC"))
351 if (strnEQ(name, "OCK_", 4)) {
352 /* We support flock() on systems which don't have it, so
353 always supply the constants. */
355 if (strEQ(name, "SH"))
361 if (strEQ(name, "EX"))
367 if (strEQ(name, "NB"))
373 if (strEQ(name, "UN"))
383 if (name[0] == '_') {
385 if (strEQ(name, "ACCMODE"))
391 if (strEQ(name, "APPEND"))
397 if (strEQ(name, "ASYNC"))
403 if (strEQ(name, "BINARY"))
409 if (strEQ(name, "CREAT"))
415 if (strEQ(name, "DEFER"))
421 if (strEQ(name, "DIRECT"))
427 if (strEQ(name, "DIRECTORY"))
433 if (strEQ(name, "DSYNC"))
439 if (strEQ(name, "EXCL"))
445 if (strEQ(name, "EXLOCK"))
451 if (strEQ(name, "LARGEFILE"))
457 if (strEQ(name, "NDELAY"))
463 if (strEQ(name, "NOCTTY"))
469 if (strEQ(name, "NOFOLLOW"))
475 if (strEQ(name, "NOINHERIT"))
481 if (strEQ(name, "NONBLOCK"))
487 if (strEQ(name, "RANDOM"))
493 if (strEQ(name, "RAW"))
499 if (strEQ(name, "RDONLY"))
505 if (strEQ(name, "RDWR"))
511 if (strEQ(name, "RSYNC"))
517 if (strEQ(name, "SEQUENTIAL"))
523 if (strEQ(name, "SHLOCK"))
529 if (strEQ(name, "SYNC"))
535 if (strEQ(name, "TEMPORARY"))
541 if (strEQ(name, "TEXT"))
547 if (strEQ(name, "TRUNC"))
553 if (strEQ(name, "WRONLY"))
559 if (strEQ(name, "ALIAS"))
565 if (strEQ(name, "RSRC"))
577 if (strEQ(name, "ISUID"))
583 if (strEQ(name, "ISGID"))
589 if (strEQ(name, "ISVTX"))
595 if (strEQ(name, "ISTXT"))
601 if (strEQ(name, "IFREG"))
607 if (strEQ(name, "IFDIR"))
613 if (strEQ(name, "IFLNK"))
619 if (strEQ(name, "IFSOCK"))
625 if (strEQ(name, "IFBLK"))
631 if (strEQ(name, "IFCHR"))
637 if (strEQ(name, "IFIFO"))
643 if (strEQ(name, "IFWHT"))
649 if (strEQ(name, "ENFMT"))
655 if (strEQ(name, "IRUSR"))
661 if (strEQ(name, "IWUSR"))
667 if (strEQ(name, "IXUSR"))
673 if (strEQ(name, "IRWXU"))
679 if (strEQ(name, "IRGRP"))
685 if (strEQ(name, "IWGRP"))
691 if (strEQ(name, "IXGRP"))
697 if (strEQ(name, "IRWXG"))
703 if (strEQ(name, "IROTH"))
709 if (strEQ(name, "IWOTH"))
715 if (strEQ(name, "IXOTH"))
721 if (strEQ(name, "IRWXO"))
727 if (strEQ(name, "IREAD"))
733 if (strEQ(name, "IWRITE"))
739 if (strEQ(name, "IEXEC"))
747 if (strEQ(name, "EK_CUR"))
753 if (strEQ(name, "EK_END"))
759 if (strEQ(name, "EK_SET"))
777 MODULE = Fcntl PACKAGE = Fcntl