Display the native pwd command.

[perl5.git] / hints / unicos.sh

diff --git a/hints/unicos.sh b/hints/unicos.sh
index 12a809d..e25b3fd 100644 (file)
--- a/hints/unicos.sh
+++ b/hints/unicos.sh
@@ -2,16 +2,20 @@ case `uname -r` in
 6.1*) shellflags="-m+65536" ;;
 esac
 case "$optimize" in
-# If we used fastmd (the default) integer values would be limited to 43 bits.
+# If we used fastmd (the default) integer values would be limited to 46 bits.
 # --Mark P. Lutz
 '') optimize="$optimize -h nofastmd" ;;
 esac
-# The default is to die on math overflows with an runtime error.
+# The default is to die in runtime on math overflows.
 # Let's not do that. --jhi
-ccflags="$ccflags -h matherr=errno" 
+ccflags="$ccflags -h matherror=errno" 
+# Give int((2/3)*3) a chance to be 2, not 1. --jhi
+ccflags="$ccflags -h rounddiv"
 # Avoid an optimizer bug where a volatile variables
 # isn't correctly saved and restored --Mark P. Lutz 
 pp_ctl_cflags='ccflags="$ccflags -h scalar0 -h vector0"'
+# Otherwise the unpack %65c checksums will fail.
+pp_pack_cflags='optimize="$ccflags -h scalar0 -h vector0"'
 case "$usemymalloc" in
 '') # The perl malloc.c SHOULD work says Ilya.
     # But for the time being (5.004_68), alas, it doesn't. --jhi
@@ -20,8 +24,9 @@ case "$usemymalloc" in
     usemymalloc='n'
     ;;
 esac
-# Configure gets fooled for some reason.  There is no getpgid().
+# Configure gets fooled for some reason, these do not exist.
 d_getpgid='undef'
+d_setitimer='undef'
 # These exist but do not really work.
 d_setregid='undef'
 d_setreuid='undef'