--- a/Unix.st Thu Nov 17 15:12:25 1994 +0100
+++ b/Unix.st Thu Nov 17 15:18:16 1994 +0100
@@ -21,7 +21,7 @@
COPYRIGHT (c) 1988 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.20 1994-10-28 01:30:26 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.21 1994-11-17 14:18:16 claus Exp $
'!
!OperatingSystem class primitiveDefinitions!
@@ -70,10 +70,34 @@
# include <sys/stat.h>
# include <errno.h>
+/*
+ * posix systems should define these ...
+ * but on some (older) systems, they are not.
+ */
# ifndef S_IXUSR
-# define S_IXUSR S_IEXEC
-# define S_IXGRP (S_IEXEC>>3)
-# define S_IXOTH (S_IEXEC>>6)
+# ifdef S_IEXEC
+# define S_IXUSR S_IEXEC
+# define S_IXGRP (S_IEXEC>>3)
+# define S_IXOTH (S_IEXEC>>6)
+# endif
+# endif
+
+# ifndef S_IXUSR
+# define S_IXUSR 0100
+# define S_IXGRP 0010
+# define S_IXOTH 0001
+# endif
+
+# ifndef S_IRUSR
+# define S_IRUSR 0400
+# define S_IRGRP 0040
+# define S_IROTH 0004
+# endif
+
+# ifndef S_IWUSR
+# define S_IWUSR 0200
+# define S_IWGRP 0020
+# define S_IWOTH 0002
# endif
# ifndef MAXPATHLEN
@@ -125,7 +149,7 @@
version
"
-$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.20 1994-10-28 01:30:26 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.21 1994-11-17 14:18:16 claus Exp $
"
!