various Configure and hints updates (prefer drand48() or random()

[p5sagit/p5-mst-13.2.git] / ext / IPC / SysV / SysV.xs

diff --git a/ext/IPC/SysV/SysV.xs b/ext/IPC/SysV/SysV.xs
index 0fbf783..cda7170 100644 (file)
--- a/ext/IPC/SysV/SysV.xs
+++ b/ext/IPC/SysV/SysV.xs
@@ -32,6 +32,18 @@
 #   include <vm/vm_param.h>
 #endif
 
+#ifndef S_IRWXU
+#   ifdef S_IRUSR
+#       define S_IRWXU (S_IRUSR|S_IWUSR|S_IWUSR)
+#       define S_IRWXG (S_IRGRP|S_IWGRP|S_IWGRP)
+#       define S_IRWXO (S_IROTH|S_IWOTH|S_IWOTH)
+#   else
+#       define S_IRWXU 0700
+#       define S_IRWXG 0070
+#       define S_IRWXO 0007
+#   endif
+#endif
+
 MODULE=IPC::SysV       PACKAGE=IPC::Msg::stat
 
 PROTOTYPES: ENABLE