| Commit | Line | Data |
|---|
| c5be433b |
1 | #define PERL_NO_GET_CONTEXT |
| a0d0e21e |
2 | #include "EXTERN.h" |
| 3 | #include "perl.h" |
| 4 | #include "XSUB.h" |
| 5 | |
| 75ced34b |
6 | #ifdef VMS |
| 7 | # include <file.h> |
| 8 | #else |
| cd661bb6 |
9 | #if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32) |
| 10 | #define _NO_OLDNAMES |
| 11 | #endif |
| 75ced34b |
12 | # include <fcntl.h> |
| cd661bb6 |
13 | #if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32) |
| 14 | #undef _NO_OLDNAMES |
| 15 | #endif |
| 75ced34b |
16 | #endif |
| a0d0e21e |
17 | |
| ac88732c |
18 | #ifdef I_UNISTD |
| 19 | #include <unistd.h> |
| 20 | #endif |
| 21 | |
| 8e07c86e |
22 | /* This comment is a kludge to get metaconfig to see the symbols |
| 23 | VAL_O_NONBLOCK |
| 24 | VAL_EAGAIN |
| 25 | RD_NODATA |
| 26 | EOF_NONBLOCK |
| 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 |
| 30 | in your extension. |
| 31 | |
| 32 | While I'm at it, I'll have metaconfig look for HAS_POLL too. |
| 33 | --AD October 16, 1995 |
| 34 | */ |
| 35 | |
| 1cb0fb50 |
36 | #include "const-c.inc" |
| a0d0e21e |
37 | |
| 38 | MODULE = Fcntl PACKAGE = Fcntl |
| 39 | |
| 1cb0fb50 |
40 | INCLUDE: const-xs.inc |
projects / p5sagit/p5-mst-13.2.git / blame