This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Tru64, gcc -O3, datasize
[perl5.git] / hints / dec_osf.sh
index c110d1e..8cf54b1 100644 (file)
 
 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 . ' '`
-       set $_gcc_version
-       if test "$1" -lt 2 -o \( "$1" -eq 2 -a \( "$2" -lt 95 -o \( "$2" -eq 95 -a "$3" -lt 2 \) \) \); then
+case "$isgcc" in
+gcc)   if [ "X$gccversion" = "X" ]; then
+           # Done too late in Configure if hinted
+           gccversion=`$cc --version | sed 's/.*(GCC) *//'`
+       fi
+       set $gccversion
+       if test "$1" -lt 2 -o \( "$1" -eq 2 -a \( "$2" -lt 95 -o \( "$2" -eq 95 -a "$3" -lt 3 \) \) \); then
            cat >&4 <<EOF
 
-*** Your cc seems to be gcc and its 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).
+*** Your cc seems to be gcc and its version ($gccversion) seems to be
+*** less than 2.95.3.  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
+*** 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.
@@ -88,10 +96,10 @@ 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
-*** dumps core (meaning  that the SDBM_File is unusable).  As this core
-*** dump 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.
+*** 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.
 
@@ -99,6 +107,7 @@ 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
@@ -114,8 +123,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"
        ;;
@@ -127,13 +136,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"
@@ -142,6 +148,51 @@ case "$optimize" in
        ;;
 esac
 
+## Optimization limits
+case "$isgcc" in
+gcc) #  gcc 3.2.1 wants a lot of memory for -O3'ing toke.c
+cat >try.c <<EOF
+#include <sys/resource.h>
+
+int main ()
+{
+    struct rlimit rl;
+    int i = getrlimit (RLIMIT_DATA, &rl);
+    printf ("%d\n", rl.rlim_cur / (1024 * 1024));
+    } /* main */
+EOF
+$cc -o try $ccflags $ldflags try.c
+       maxdsiz=`./try`
+rm -f try try.c core
+if [ $maxdsiz -lt 256 ]; then
+    # less than 256 MB is probably not enough to optimize toke.c with gcc -O3
+    cat <<EOM >&4
+
+Your process datasize is limited to $maxdsiz MB, which is (sadly) not
+always enough to fully optimize some source code files of Perl,
+at least 256 MB seems to be necessary as of Perl 5.8.0.  I'll try to
+use a lower optimization level for those parts.  You could either try
+using your shell's ulimit/limit/limits command to raise your datasize
+(assuming the system-wide hard resource limits allow you to go higher),
+or if you can't go higher and if you are a sysadmin, and you *do* want
+the full optimization, you can tune the 'max_per_proc_data_size'
+kernel parameter: see man sysconfigtab, and man sys_attrs_proc.
+
+EOM
+toke_cflags='optimize=-O2'
+    fi
+;;
+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
@@ -253,8 +304,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,6 +322,12 @@ $define|true|[yY]*)
                usemymalloc='n'
                ;;
        esac
+       # These symbols are renamed in <time.h> so
+       # that the Configure hasproto doesn't see them.
+       d_asctime_r_proto="$define"
+       d_ctime_r_proto="$define"
+       d_gmtime_r_proto="$define"
+       d_localtime_r_proto="$define"
        ;;
 esac
 EOCBU
@@ -279,10 +336,80 @@ 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
+               ;;
+       *)
+               # Test whether libc's been fixed yet.
+               cat >try.c <<\TRY
+#include <stdio.h>
+int main(int argc, char **argv)
+{
+       unsigned long uvmax = ~0UL;
+       long double ld = uvmax + 0.0L;
+       char buf1[30], buf2[30];
+
+       (void) sprintf(buf1, "%lu", uvmax);
+       (void) sprintf(buf2, "%.0Lf", ld);
+       return strcmp(buf1, buf2) != 0;
+}
+TRY
+               # Don't bother trying to work with Configure's idea of
+               # cc and the various flags.  This might not work as-is
+               # with gcc -- but we're testing libc, not the compiler.
+               if cc -o try -std try.c && ./try
+               then
+                       : ok
+               else
+                       cat <<\UGLY >&4
+!
+Warning!  Your libc has not yet been patched so that its "%Lf" format for
+printing long doubles shows all the significant digits.  You will get errors
+in the t/op/numconvert test because of this.  (The data is still good
+internally, and the "%e" format of printf() or sprintf() in perl will still
+produce valid results.)  See README.tru64 for additional details.
+
+Continuing anyway.
+!
+UGLY
+               fi
+               $rm -f try try.c
+       esac
+       ;;
 esac
 EOCBU
 
+case "`/usr/sbin/sizer -v`" in
+*[1-4].0*) d_modfl=undef ;; # must wait till 5.0
+esac
+
+# Keep that leading tab.
+       old_LD_LIBRARY_PATH=$LD_LIBRARY_PATH
+for p in $loclibpth
+do
+       if test -d $p; then
+           echo "Appending $p to LD_LIBRARY_PATH." >& 4
+           case "$LD_LIBRARY_PATH" in
+           '') LD_LIBRARY_PATH=$p                  ;;
+           *)  LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$p ;;
+           esac
+       fi      
+done
+case "$LD_LIBRARY_PATH" in
+"$old_LD_LIBRARY_PATH") ;;
+*) echo "LD_LIBRARY_PATH is now $LD_LIBRARY_PATH." >& 4 ;;
+esac
+
 #
 # Unset temporary variables no more needed.
 #