diff options
author | Jarkko Hietaniemi <Jarkko.Hietaniemi@cc.hut.fi> | 1997-01-19 20:11:22 +0200 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1997-01-25 15:58:00 +1200 |
commit | 705af49881f30cfecf0e96f7cd0ee83dea50d68d (patch) | |
tree | f1319bda08fbd2913a0c2a0e8868d84aafd2267e /ext/Fcntl/Fcntl.xs | |
parent | ff7f3c60e77f15ff4f5a3176285a6a22c685a51b (diff) | |
download | perl-705af49881f30cfecf0e96f7cd0ee83dea50d68d.tar.gz |
Fcntl: add more constants
Subject: O_EXLOCK, O_SHLOCK to Fcntl.
p5p-msgid: <199701191717.TAA17694@alpha.hut.fi>
private-msgid: <199701191811.UAA16346@alpha.hut.fi>
Diffstat (limited to 'ext/Fcntl/Fcntl.xs')
-rw-r--r-- | ext/Fcntl/Fcntl.xs | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/ext/Fcntl/Fcntl.xs b/ext/Fcntl/Fcntl.xs index 0f51b100d7..4ecdf91e9c 100644 --- a/ext/Fcntl/Fcntl.xs +++ b/ext/Fcntl/Fcntl.xs @@ -214,6 +214,60 @@ int arg; #else goto not_there; #endif + if (strEQ(name, "O_EXLOCK")) +#ifdef O_EXLOCK + return O_EXLOCK; +#else + goto not_there; +#endif + if (strEQ(name, "O_SHLOCK")) +#ifdef O_SHLOCK + return O_SHLOCK; +#else + goto not_there; +#endif + if (strEQ(name, "O_ASYNC")) +#ifdef O_ASYNC + return O_ASYNC; +#else + goto not_there; +#endif + if (strEQ(name, "O_DSYNC")) +#ifdef O_DSYNC + return O_DSYNC; +#else + goto not_there; +#endif + if (strEQ(name, "O_RSYNC")) +#ifdef O_RSYNC + return O_RSYNC; +#else + goto not_there; +#endif + if (strEQ(name, "O_SYNC")) +#ifdef O_SYNC + return O_SYNC; +#else + goto not_there; +#endif + if (strEQ(name, "F_SETOWN")) +#ifdef F_SETOWN + return F_SETOWN; +#else + goto not_there; +#endif + if (strEQ(name, "F_GETOWN")) +#ifdef F_GETOWN + return F_GETOWN; +#else + goto not_there; +#endif + if (strEQ(name, "O_DEFER")) +#ifdef O_DEFER + return O_DEFER; +#else + goto not_there; +#endif } else goto not_there; break; |