summaryrefslogtreecommitdiff
path: root/ext/Fcntl/Fcntl.xs
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-12-12 18:09:41 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-12-12 18:09:41 +0000
commit1d7c184104c076988718a01b77c8706aae05b092 (patch)
treedcfa50ebf2bdc26c54db7728f6c79288856a8024 /ext/Fcntl/Fcntl.xs
parent70401c6b81f84e7fa2f97451ac473505c0d13373 (diff)
downloadperl-1d7c184104c076988718a01b77c8706aae05b092.tar.gz
integrate mainline changes
p4raw-id: //depot/utfperl@4679
Diffstat (limited to 'ext/Fcntl/Fcntl.xs')
-rw-r--r--ext/Fcntl/Fcntl.xs12
1 files changed, 12 insertions, 0 deletions
diff --git a/ext/Fcntl/Fcntl.xs b/ext/Fcntl/Fcntl.xs
index 0dab7f17e4..08252b6538 100644
--- a/ext/Fcntl/Fcntl.xs
+++ b/ext/Fcntl/Fcntl.xs
@@ -504,6 +504,18 @@ constant(char *name, int arg)
#else
goto not_there;
#endif
+ if (strEQ(name, "O_ALIAS"))
+#ifdef O_ALIAS
+ return O_ALIAS;
+#else
+ goto not_there;
+#endif
+ if (strEQ(name, "O_RSRC"))
+#ifdef O_RSRC
+ return O_RSRC;
+#else
+ goto not_there;
+#endif
} else
goto not_there;
break;