Workaround for the buggy ("internal compiler error")

[perl5.git] / hints / unicosmk.sh

diff --git a/hints/unicosmk.sh b/hints/unicosmk.sh
index 6113cc3..f3416ff 100644 (file)
--- a/hints/unicosmk.sh
+++ b/hints/unicosmk.sh
@@ -16,3 +16,17 @@ case ":$PATH:" in
     esac
     ;;
 esac
+# As of UNICOS/mk 2.0.5.24 the shm* are in libc but unimplemented
+# (an attempt to use them causes a runtime error)
+# XXX Configure probe for really functional shm*() is needed XXX
+if test "$d_shm" = ""; then
+    d_shmat=${d_shmat:-undef}
+    d_shmdt=${d_shmdt:-undef}
+    d_shmget=${d_shmget:-undef}
+    d_shmctl=${d_shmctl:-undef}
+    case "$d_shmat$d_shmctl$d_shmdt$d_shmget" in
+    *"undef"*) d_shm="$undef" ;;
+    esac
+fi
+
+