summaryrefslogtreecommitdiff
path: root/ext/Fcntl/Fcntl.xs
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-07-07 18:47:03 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-07-07 18:47:03 +0000
commitd9fde92e0874aabf610d52680de462a0e0165d23 (patch)
tree54402f7433a7b88069fca6783fbbeef3858064cc /ext/Fcntl/Fcntl.xs
parentf4a4467857881c0eff741f3ed60e43295004891a (diff)
downloadperl-d9fde92e0874aabf610d52680de462a0e0165d23.tar.gz
change#1889 mistakenly removed F_SETLK
p4raw-link: @1889 on //depot/perl: 5ff3f7a4e03a6b103d9e628865398e498e9a7968 p4raw-id: //depot/perl@3654
Diffstat (limited to 'ext/Fcntl/Fcntl.xs')
-rw-r--r--ext/Fcntl/Fcntl.xs6
1 files changed, 6 insertions, 0 deletions
diff --git a/ext/Fcntl/Fcntl.xs b/ext/Fcntl/Fcntl.xs
index a8e0e8ac63..2446ab77e8 100644
--- a/ext/Fcntl/Fcntl.xs
+++ b/ext/Fcntl/Fcntl.xs
@@ -108,6 +108,12 @@ constant(char *name, int arg)
#else
goto not_there;
#endif
+ if (strEQ(name, "F_SETLK"))
+#ifdef F_SETLK
+ return F_SETLK;
+#else
+ goto not_there;
+#endif
if (strEQ(name, "F_SETLK64"))
#ifdef F_SETLK64
return F_SETLK64;