X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=hints%2Fdec_osf.sh;h=ae56198e8776c037e76d15e40657e9c1025f8af0;hb=6e9d10810a2ec27ec94fd014e5dbab341c35afb1;hp=31b0513240a2444ffb5d9915ec6f57bfadc73fb7;hpb=f931c1d2a027bca992f7d63bb19afeffa8162370;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/hints/dec_osf.sh b/hints/dec_osf.sh
index 31b0513..ae56198 100644
--- a/hints/dec_osf.sh
+++ b/hints/dec_osf.sh
@@ -60,37 +60,51 @@
 
 cc=${cc:-cc}
 
+case "`$cc -v 2>&1 | grep cc`" in
+*gcc*) isgcc=gcc ;;
+esac
+
 # do NOT, I repeat, *NOT* take away the leading tabs
 # Configure Black Magic (TM)
 	# reset
 	_DEC_cc_style=
-case "`$cc -v 2>&1 | grep cc`" in
-*gcc*)	_gcc_version=`$cc --version 2>&1 | tr . ' '`
+case "$isgcc" in
+gcc)	_gcc_version=`$cc --version 2>&1 | tr . ' '`
 	set $_gcc_version
-	if test "$1" -lt 2 -o \( "$1" -eq 2 -a "$2" -lt 95 \); then
+	if test "$1" -lt 2 -o \( "$1" -eq 2 -a \( "$2" -lt 95 -o \( "$2" -eq 95 -a "$3" -lt 2 \) \) \); then
 	    cat >&4 <<EOF
 
-Your cc seems to be gcc and its version seems to be less than 2.95.
-This is not a good idea since old versions of gcc are known to produce
-buggy code when compiling Perl (and no doubt for other programs, too).
-
-Therefore, I strongly suggest upgrading your gcc.  (Why don't you
-use the vendor cc is also a good question.  It comes with the operating
-system and produces good code.)
-
-Note that as of gcc 2.95 (19990728) and Perl 5.6.0 (end of March 2000)
-if the said Perl is compiled with the said gcc the lib/sdbm test will 
-dump core.  As this doesn't happen with the vendor cc, this is
-most probably a lingering bug in gcc.  Therefore unless you have
-a better gcc you are still better off using the vendor cc.
+*** Your cc seems to be gcc and its version ($_gcc_version) seems to be
+*** less than 2.95.2.  This is not a good idea since old versions of gcc
+*** are known to produce buggy code when compiling Perl (and no doubt for
+*** other programs, too).
+***
+*** Therefore, I strongly suggest upgrading your gcc.  (Why don't you use
+*** the vendor cc is also a good question.  It comes with the operating
+*** system and produces good code.)
 
 Cannot continue, aborting.
 
 EOF
 	    exit 1
 	fi
+	if test "$1" -eq 2 -a "$2" -eq 95 -a "$3" -le 2; then
+	    cat >&4 <<EOF
+
+*** Note that as of gcc 2.95.2 (19991024) and Perl 5.6.0 (March 2000)
+*** if the said Perl is compiled with the said gcc the lib/sdbm test
+*** may dump core (meaning that the SDBM_File extension is unusable).
+*** As this core dump never happens with the vendor cc, this is most
+*** probably a lingering bug in gcc.  Therefore unless you have a better
+*** gcc installation you are still better off using the vendor cc.
+
+Since you explicitly chose gcc, I assume that you know what are doing.
+
+EOF
+	fi
         ;;
 *)	# compile something small: taint.c is fine for this.
+	ccversion=`cc -V | awk '/(Compaq|DEC) C/ {print $3}' | grep '^V'`
     	# the main point is the '-v' flag of 'cc'.
        	case "`cc -v -I. -c taint.c -o taint$$.o 2>&1`" in
 	*/gemc_cc*)	# we have the new DEC GEM CC
@@ -106,8 +120,8 @@ EOF
 esac
 
 # be nauseatingly ANSI
-case "`$cc -v 2>&1 | grep gcc`" in
-*gcc*)	ccflags="$ccflags -ansi"
+case "$isgcc" in
+gcc)	ccflags="$ccflags -ansi"
 	;;
 *)	ccflags="$ccflags -std"
 	;;
@@ -119,13 +133,10 @@ esac
 # we want optimisation
 
 case "$optimize" in
-'')	case "`$cc -v 2>&1 | grep gcc`" in
-	*gcc*)	
-		optimize='-O3'				;;
+'')	case "$isgcc" in
+	gcc)	optimize='-O3'				;;
 	*)	case "$_DEC_cc_style" in
-		new)	optimize='-O4'
-			ccflags="$ccflags -fprm d -ieee"
-			;;
+		new)	optimize='-O4'			;;
 		old)	optimize='-O2 -Olimit 3200'	;;
 	    	esac
 		ccflags="$ccflags -D_INTRINSICS"
@@ -134,6 +145,15 @@ case "$optimize" in
 	;;
 esac
 
+# we want dynamic fp rounding mode, and we want ieee exception semantics
+case "$isgcc" in
+gcc)	;;
+*)	case "$_DEC_cc_style" in
+	new)	ccflags="$ccflags -fprm d -ieee"	;;
+	esac
+	;;
+esac
+
 # Make glibpth agree with the compiler suite.  Note that /shlib
 # is not here.  That's on purpose.  Even though that's where libc
 # really lives from V4.0 on, the linker (and /sbin/loader) won't
@@ -245,8 +265,8 @@ cat > UU/usethreads.cbu <<'EOCBU'
 case "$usethreads" in
 $define|true|[yY]*)
 	# Threads interfaces changed with V4.0.
-	case "`$cc -v 2>&1 | grep gcc`" in
-	*gcc*)ccflags="-D_REENTRANT $ccflags" ;;
+	case "$isgcc" in
+	gcc)	ccflags="-D_REENTRANT $ccflags" ;;
 	*)  case "`uname -r`" in
 	    *[123].*)	ccflags="-threads $ccflags" ;;
 	    *)          ccflags="-pthread $ccflags" ;;
@@ -271,10 +291,29 @@ cat > UU/uselongdouble.cbu <<'EOCBU'
 # This script UU/uselongdouble.cbu will get 'called-back' by Configure 
 # after it has prompted the user for whether to use long doubles.
 case "$uselongdouble" in
-$define|true|[yY]*) d_Gconvert='sprintf((b),"%.*Lg",(n),(x))' ;;
+$define|true|[yY]*)
+	case "`/usr/sbin/sizer -v`" in
+	*[1-4].0*)	cat >&4 <<EOF
+
+***
+*** Sorry, you cannot use long doubles in pre-V5.0 releases of Tru64.
+***
+
+Cannot continue, aborting.
+
+EOF
+		exit 1
+		;;
+	esac
+	d_Gconvert='sprintf((b),"%.*Lg",(n),(x))'
+	;;
 esac
 EOCBU
 
+case "`/usr/sbin/sizer -v`" in
+*[1-4].0*) d_modfl=undef ;; # must wait till 5.0
+esac
+
 #
 # Unset temporary variables no more needed.
 #