Changeset 20074 for branches/vendor/third/perl/Configure

Timestamp:

02/09/04 14:10:55 (6 years ago)

Author:

zacheiss

Message:

Import perl 5.8.3.

Files:

• branches/vendor/third/perl/Configure (modified) (131 diffs)

branches/vendor/third/perl/Configure

@@ -19 +19 @@
 #
 
-# $Id: Configure,v 1.1.1.5 2003-01-10 13:46:08 zacheiss Exp $
+# $Id: Configure,v 1.1.1.6 2004-02-09 19:08:10 zacheiss Exp $
 #
-# Generated on Fri Jul 19 01:54:37 EET DST 2002 [metaconfig 3.0 PL70]
+# Generated on Fri Dec  5 12:57:38 MET 2003 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.org)
 
@@ -47 +47 @@
 (exit $?0) || exec sh $0 $argv:q
 rm -f c1$$ c2$$
+
+if test -f /dev/cputype -a -f /dev/drivers -a -f /dev/osversion; then
+        cat >&4 <<EOF
+***
+*** I'm sorry but this system looks like Plan 9 and Plan 9 doesn't do
+*** Configure that well.  (Plan 9 is close to UNIX but not close enough.)
+*** Please read the README.plan9 for further instructions.
+*** Cannot continue, aborting.
+***
+EOF
+        exit 1
+fi
 
 : compute my invocation name
@@ -60 +72 @@
 p_=:
 : On OS/2 this directory should exist if this is not floppy only system :-]
-if test -d c:/. ; then
+if test -d c:/. || ( uname -a | grep -i 'os\(/\|\)2' ) 2>&1 >/dev/null ; then
     if test -n "$OS2_SHELL"; then
                 p_=\;
                 PATH=`cmd /c "echo %PATH%" | tr '\\\\' / `
                 OS2_SHELL=`cmd /c "echo %OS2_SHELL%" | tr '\\\\' / | tr '[A-Z]' '[a-z]'`
+                is_os2=yes
         elif test -n "$DJGPP"; then
                 case "X${MACHTYPE:-nonesuchmach}" in
@@ -166 +179 @@
 cd UU && rm -f ./*
 
-
 ccname=''
 ccversion=''
@@ -177 +189 @@
 to=''
 usecrosscompile=''
+mistrustnm=''
 perllibs=''
 dynamic_ext=''
@@ -323 +336 @@
 d_access=''
 d_accessx=''
+d_aintl=''
 d_alarm=''
 asctime_r_proto=''
@@ -341 +355 @@
 d_cmsghdr_s=''
 d_const=''
+d_copysignl=''
 cryptlib=''
 d_crypt=''
@@ -384 +399 @@
 d_endservent_r=''
 endservent_r_proto=''
+d_faststdio=''
 d_fchdir=''
 d_fchmod=''
@@ -499 +515 @@
 d_hasmntopt=''
 d_htonl=''
+d_ilogbl=''
 d_inetaton=''
 d_int64_t=''
@@ -539 +556 @@
 d_modfl=''
 d_modfl_pow32_bug=''
+d_modflproto=''
 d_mprotect=''
 d_msg=''
@@ -563 +581 @@
 old_pthread_create_joinable=''
 d_pthread_atfork=''
+d_pthread_attr_setscope=''
 d_pthread_yield=''
 d_sched_yield=''
@@ -586 +605 @@
 d_sanemcmp=''
 d_sbrkproto=''
+d_scalbnl=''
 d_select=''
 d_sem=''
@@ -755 +775 @@
 fpossize=''
 fpostype=''
+gccansipedantic=''
 gccosandvers=''
 gccversion=''
@@ -764 +785 @@
 h_fcntl=''
 h_sysfile=''
+html1dir=''
+html1direxp=''
+installhtml1dir=''
+html3dir=''
+html3direxp=''
+installhtml3dir=''
 i_arpainet=''
 i_crypt=''
@@ -1046 +1073 @@
 sitebin=''
 sitebinexp=''
+installsitehtml1dir=''
+sitehtml1dir=''
+sitehtml1direxp=''
+installsitehtml3dir=''
+sitehtml3dir=''
+sitehtml3direxp=''
 installsitelib=''
 sitelib=''
 sitelib_stem=''
 sitelibexp=''
+installsiteman1dir=''
+siteman1dir=''
+siteman1direxp=''
+installsiteman3dir=''
+siteman3dir=''
+siteman3direxp=''
 siteprefix=''
 siteprefixexp=''
+installsitescript=''
+sitescript=''
+sitescriptexp=''
 sizesize=''
 sizetype=''
@@ -1075 +1117 @@
 use64bitall=''
 use64bitint=''
+usefaststdio=''
 ccflags_uselargefiles=''
 ldflags_uselargefiles=''
@@ -1104 +1147 @@
 vendorbin=''
 vendorbinexp=''
+installvendorhtml1dir=''
+vendorhtml1dir=''
+vendorhtml1direxp=''
+installvendorhtml3dir=''
+vendorhtml3dir=''
+vendorhtml3direxp=''
 d_vendorlib=''
 installvendorlib=''
@@ -1109 +1158 @@
 vendorlib_stem=''
 vendorlibexp=''
+installvendorman1dir=''
+vendorman1dir=''
+vendorman1direxp=''
+installvendorman3dir=''
+vendorman3dir=''
+vendorman3direxp=''
 usevendorprefix=''
 vendorprefix=''
 vendorprefixexp=''
+d_vendorscript=''
+installvendorscript=''
+vendorscript=''
+vendorscriptexp=''
 versiononly=''
 defvoidused=''
@@ -1145 +1204 @@
 : DOS DJGPP
     _exe=".exe"
-elif test -d c:/. ; then
+elif test -d c:/. -o -n "$is_os2" ; then
 : OS/2 or cygwin
     _exe=".exe"
@@ -1193 +1252 @@
 : some systems want to use only the non-versioned libso:s
 ignore_versioned_solibs=''
+siteman1dir=''
+siteman3dir=''
+sitescript=''
 archname64=''
 ccflags_uselargefiles=''
@@ -1205 +1267 @@
 
 : List of libraries we want.
-: If anyone needs -lnet, put it in a hint file.
-libswanted='sfio socket bind inet nsl nm ndbm gdbm dbm db malloc dl'
-libswanted="$libswanted dld ld sun m c cposix posix"
-libswanted="$libswanted ndir dir crypt sec"
-libswanted="$libswanted ucb bsd BSD PW x util"
+: If anyone needs extra -lxxx, put those in a hint file.
+libswanted="sfio socket bind inet nsl nm ndbm gdbm dbm db malloc dl dld ld sun"
+libswanted="$libswanted m crypt sec util c cposix posix ucb bsd BSD"
 : We probably want to search /usr/shlib before most other libraries.
 : This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
@@ -2153 +2213 @@
                 if test -n "$DJGPP"; then
                         echo \$dir/\$thing.exe
-                else
+                elif test "$eunicefix" != ":"; then
                         : on Eunice apparently
                         echo \$dir/\$thing
+                        exit 0
                 fi
                 exit 0
@@ -3083 +3144 @@
                         osvers="$3"
                         ;;
+                os2)    osname=os2
+                        osvers="$4"
+                        ;;
                 POSIX-BC | posix-bc ) osname=posix-bc
                         osvers="$3"
@@ -3121 +3185 @@
                                 alpha)
                                         osname=dec_osf
-                                        osvers=`sizer -v | awk '{print $3}' |  tr '[A-Z]' '[a-z]' | sed 's/^[xvt]//'`
+                                        osvers=`sizer -v | awk -FUNIX '{print $2}' | awk '{print $1}' |  tr '[A-Z]' '[a-z]' | sed 's/^[xvt]//'`
                                         case "$osvers" in
                                         [1-9].[0-9]*) ;;
@@ -3131 +3195 @@
                         esac
                         ;;
-                unixware) osname=svr5
+                # UnixWare 7.1.2 is known as Open UNIX 8
+                openunix|unixware) osname=svr5
                         osvers="$4"
                         ;;
@@ -3201 +3266 @@
                         fi
                         $rm -f UU/kernel.what
-                elif test -d c:/.; then
+                elif test -d c:/. -o -n "$is_os2" ; then
                         set X $myuname
                         osname=os2
@@ -3609 +3674 @@
 
 
-case "$usethreads" in
-"$define"|true|[yY]*)
 : Look for a hint-file generated 'call-back-unit'.  If the
 : user has specified that a threading perl is to be built,
 : we may need to set or change some other defaults.
-        if $test -f usethreads.cbu; then
-                echo "Your platform has some specific hints for threaded builds, using them..."
-                . ./usethreads.cbu
-        else
+if $test -f usethreads.cbu; then
+    echo "Your platform has some specific hints regarding threaded builds, using them..."
+    . ./usethreads.cbu
+else
+    case "$usethreads" in
+        "$define"|true|[yY]*)
                 $cat <<EOM
-(Your platform doesn't have any specific hints for threaded builds.
+(Your platform does not have any specific hints for threaded builds.
  Assuming POSIX threads, then.)
 EOM
-        fi
-        ;;
-esac
+        ;;
+    esac
+fi
 
 cat <<EOM
@@ -3792 +3857 @@
 #endif
 #endif
-        exit(0);
+        return(0);
 }
 EOM
@@ -3800 +3865 @@
         '') echo "You are not using GNU cc." ;;
         *)  echo "You are using GNU cc $gccversion."
-            ccname=gcc  
+            ccname=gcc
             ;;
         esac
@@ -3853 +3918 @@
 esac
 
-# gcc 3.1 complains about adding -Idirectories that it already knows about,
+# gcc 3.* complain about adding -Idirectories that they already know about,
 # so we will take those off from locincpth.
 case "$gccversion" in
 3*)
     echo "main(){}">try.c
-    for incdir in `$cc -v -c try.c 2>&1 | \
-       sed '1,/^#include <\.\.\.>/d;/^End of search list/,$d;s/^ //'` ; do
-       locincpth=`echo $locincpth | sed s!$incdir!!`
+    for incdir in $locincpth; do
+       warn=`$cc $ccflags -I$incdir -c try.c 2>&1 | \
+             grep '^c[cp]p*[01]: warning: changing search order '`
+       if test "X$warn" != X; then
+           locincpth=`echo " $locincpth " | sed "s! $incdir ! !"`
+       fi
     done
     $rm -f try try.*
@@ -4451 +4519 @@
 esac
 
+case "$ccflags" in
+*-DUSE_LONG_DOUBLE*|*-DUSE_MORE_BITS*) uselongdouble="$define" ;;
+esac
+
+case "$uselongdouble" in
+$define|true|[yY]*)     dflt='y';;
+*) dflt='n';;
+esac
+cat <<EOM
+
+Perl can be built to take advantage of long doubles which
+(if available) may give more accuracy and range for floating point numbers.
+
+If this doesn't make any sense to you, just accept the default '$dflt'.
+EOM
+rp='Try to use long doubles if available?'
+. ./myread
+case "$ans" in
+y|Y)    val="$define"   ;;
+*)      val="$undef"    ;;
+esac
+set uselongdouble
+eval $setvar
+
+case "$uselongdouble" in
+true|[yY]*) uselongdouble="$define" ;;
+esac
+
+: Look for a hint-file generated 'call-back-unit'.  If the
+: user has specified that long doubles should be used,
+: we may need to set or change some other defaults.
+if $test -f uselongdouble.cbu; then
+    echo "Your platform has some specific hints regarding long doubles, using them..."
+    . ./uselongdouble.cbu
+else
+    case "$uselongdouble" in
+        $define)
+                $cat <<EOM
+(Your platform does not have any specific hints for long doubles.)
+EOM
+        ;;
+    esac
+fi
+
 : Looking for optional libraries
 echo " "
@@ -4798 +4910 @@
 $cat > try.c <<'EOF'
 #include <stdio.h>
-int main() { printf("Ok\n"); exit(0); }
+int main() { printf("Ok\n"); return(0); }
 EOF
 set X $cc -o try $optimize $ccflags $ldflags try.c $libs
@@ -4881 +4993 @@
 shift;
 $cc -o ${mc_file} $optimize $ccflags $ldflags $* ${mc_file}.c $libs;'
-
-: check for lengths of integral types
-echo " "
-case "$intsize" in
-'')
-        echo "Checking to see how big your integers are..." >&4
-        $cat >try.c <<'EOCP'
-#include <stdio.h>
-int main()
-{
-        printf("intsize=%d;\n", (int)sizeof(int));
-        printf("longsize=%d;\n", (int)sizeof(long));
-        printf("shortsize=%d;\n", (int)sizeof(short));
-        exit(0);
-}
-EOCP
-        set try
-        if eval $compile_ok && $run ./try > /dev/null; then
-                eval `$run ./try`
-                echo "Your integers are $intsize bytes long."
-                echo "Your long integers are $longsize bytes long."
-                echo "Your short integers are $shortsize bytes long."
-        else
-                $cat >&4 <<EOM
-!
-Help! I can't compile and run the intsize test program: please enlighten me!
-(This is probably a misconfiguration in your system or libraries, and
-you really ought to fix it.  Still, I'll try anyway.)
-!
-EOM
-                dflt=4
-                rp="What is the size of an integer (in bytes)?"
-                . ./myread
-                intsize="$ans"
-                dflt=$intsize
-                rp="What is the size of a long integer (in bytes)?"
-                . ./myread
-                longsize="$ans"
-                dflt=2
-                rp="What is the size of a short integer (in bytes)?"
-                . ./myread
-                shortsize="$ans"
-        fi
-        ;;
-esac
-$rm -f try try.*
-
-: check for long long
-echo " "
-echo "Checking to see if you have long long..." >&4
-echo 'int main() { long long x = 7; return 0; }' > try.c
-set try
-if eval $compile; then
-        val="$define"
-        echo "You have long long."
-else
-        val="$undef"
-        echo "You do not have long long."
-fi
-$rm try.*
-set d_longlong
-eval $setvar
-
-: check for length of long long
-case "${d_longlong}${longlongsize}" in
-$define)
-        echo " "
-        echo "Checking to see how big your long longs are..." >&4
-        $cat >try.c <<'EOCP'
-#include <stdio.h>
-int main()
-{
-    printf("%d\n", (int)sizeof(long long));
-    return(0);
-}
-EOCP
-        set try
-        if eval $compile_ok; then
-                longlongsize=`$run ./try`
-                echo "Your long longs are $longlongsize bytes long."
-        else
-                dflt='8'
-                echo " "
-                echo "(I can't seem to compile the test program.  Guessing...)"
-                rp="What is the size of a long long (in bytes)?"
-                . ./myread
-                longlongsize="$ans"
-        fi
-        if $test "X$longsize" = "X$longlongsize"; then
-                echo "(That isn't any different from an ordinary long.)"
-        fi      
-        ;;
-esac
-$rm -f try.* try
 
 : determine filename position in cpp output
@@ -5015 +5033 @@
 case "$osname" in
 vos) cppfilter="tr '\\\\>' '/' |" ;; # path component separator is >
+os2) cppfilter="sed -e 's|\\\\\\\\|/|g' |" ;; # path component separator is \
 *)   cppfilter='' ;;
 esac
@@ -5084 +5103 @@
         set $yyy; shift; shift; yyy=$@;
 done'
+
+: see if stdlib is available
+set stdlib.h i_stdlib
+eval $inhdr
+
+: check for lengths of integral types
+echo " "
+case "$intsize" in
+'')
+        echo "Checking to see how big your integers are..." >&4
+        $cat >try.c <<EOCP
+#include <stdio.h>
+#$i_stdlib I_STDLIB
+#ifdef I_STDLIB
+#include <stdlib.h>
+#endif
+int main()
+{
+        printf("intsize=%d;\n", (int)sizeof(int));
+        printf("longsize=%d;\n", (int)sizeof(long));
+        printf("shortsize=%d;\n", (int)sizeof(short));
+        exit(0);
+}
+EOCP
+        set try
+        if eval $compile_ok && $run ./try > /dev/null; then
+                eval `$run ./try`
+                echo "Your integers are $intsize bytes long."
+                echo "Your long integers are $longsize bytes long."
+                echo "Your short integers are $shortsize bytes long."
+        else
+                $cat >&4 <<EOM
+!
+Help! I can't compile and run the intsize test program: please enlighten me!
+(This is probably a misconfiguration in your system or libraries, and
+you really ought to fix it.  Still, I'll try anyway.)
+!
+EOM
+                dflt=4
+                rp="What is the size of an integer (in bytes)?"
+                . ./myread
+                intsize="$ans"
+                dflt=$intsize
+                rp="What is the size of a long integer (in bytes)?"
+                . ./myread
+                longsize="$ans"
+                dflt=2
+                rp="What is the size of a short integer (in bytes)?"
+                . ./myread
+                shortsize="$ans"
+        fi
+        ;;
+esac
+$rm -f try try.*
+
+: check for long long
+echo " "
+echo "Checking to see if you have long long..." >&4
+echo 'int main() { long long x = 7; return 0; }' > try.c
+set try
+if eval $compile; then
+        val="$define"
+        echo "You have long long."
+else
+        val="$undef"
+        echo "You do not have long long."
+fi
+$rm try.*
+set d_longlong
+eval $setvar
+
+: check for length of long long
+case "${d_longlong}${longlongsize}" in
+$define)
+        echo " "
+        echo "Checking to see how big your long longs are..." >&4
+        $cat >try.c <<'EOCP'
+#include <stdio.h>
+int main()
+{
+    printf("%d\n", (int)sizeof(long long));
+    return(0);
+}
+EOCP
+        set try
+        if eval $compile_ok; then
+                longlongsize=`$run ./try`
+                echo "Your long longs are $longlongsize bytes long."
+        else
+                dflt='8'
+                echo " "
+                echo "(I can't seem to compile the test program.  Guessing...)"
+                rp="What is the size of a long long (in bytes)?"
+                . ./myread
+                longlongsize="$ans"
+        fi
+        if $test "X$longsize" = "X$longlongsize"; then
+                echo "(That isn't any different from an ordinary long.)"
+        fi      
+        ;;
+esac
+$rm -f try.* try
 
 : see if inttypes.h is available
@@ -5327 +5448 @@
 esac
 
-case "$use64bitint" in
-"$define"|true|[yY]*)
 : Look for a hint-file generated 'call-back-unit'.  If the
 : user has specified that a 64-bit perl is to be built,
 : we may need to set or change some other defaults.
         if $test -f use64bitint.cbu; then
-                echo "Your platform has some specific hints for 64-bit integers, using them..."
+        echo "Your platform has some specific hints regarding 64-bit integers, using them..."
                 . ./use64bitint.cbu
         fi
+case "$use64bitint" in
+"$define"|true|[yY]*)
         case "$longsize" in
         4) case "$archname64" in
@@ -5345 +5466 @@
 esac
 
-case "$use64bitall" in
-"$define"|true|[yY]*)
 : Look for a hint-file generated 'call-back-unit'.  If the
 : user has specified that a maximally 64-bit perl is to be built,
 : we may need to set or change some other defaults.
         if $test -f use64bitall.cbu; then
-                echo "Your platform has some specific hints for 64-bit builds, using them..."
+        echo "Your platform has some specific hints regarding 64-bit builds, using them..."
                 . ./use64bitall.cbu
         fi
+case "$use64bitall" in
+"$define"|true|[yY]*)
         case "$longsize" in
         4) case "$archname64" in
@@ -5362 +5483 @@
         ;;
 esac
+
+case "$d_quad:$use64bitint" in
+$undef:$define)
+        cat >&4 <<EOF
+
+*** You have chosen to use 64-bit integers,
+*** but none cannot be found.
+*** Please rerun Configure without -Duse64bitint and/or -Dusemorebits.
+*** Cannot continue, aborting.
+
+EOF
+        exit 1
+        ;;
+esac
+
+: check for length of double
+echo " "
+case "$doublesize" in
+'')
+        echo "Checking to see how big your double precision numbers are..." >&4
+        $cat >try.c <<EOCP
+#include <stdio.h>
+#$i_stdlib I_STDLIB
+#ifdef I_STDLIB
+#include <stdlib.h>
+#endif
+int main()
+{
+    printf("%d\n", (int)sizeof(double));
+    exit(0);
+}
+EOCP
+        set try
+        if eval $compile_ok; then
+                doublesize=`$run ./try`
+                echo "Your double is $doublesize bytes long."
+        else
+                dflt='8'
+                echo "(I can't seem to compile the test program.  Guessing...)"
+                rp="What is the size of a double precision number (in bytes)?"
+                . ./myread
+                doublesize="$ans"
+        fi
+        ;;
+esac
+$rm -f try.c try
+
+: check for long doubles
+echo " "
+echo "Checking to see if you have long double..." >&4
+echo 'int main() { long double x = 7.0; }' > try.c
+set try
+if eval $compile; then
+        val="$define"
+        echo "You have long double."
+else
+        val="$undef"
+        echo "You do not have long double."
+fi
+$rm try.*
+set d_longdbl
+eval $setvar
+
+: check for length of long double
+case "${d_longdbl}${longdblsize}" in
+$define)
+        echo " "
+        echo "Checking to see how big your long doubles are..." >&4
+        $cat >try.c <<'EOCP'
+#include <stdio.h>
+int main()
+{
+        printf("%d\n", sizeof(long double));
+}
+EOCP
+        set try
+        set try
+        if eval $compile; then
+                longdblsize=`$run ./try`
+                echo "Your long doubles are $longdblsize bytes long."
+        else
+                dflt='8'
+                echo " "
+                echo "(I can't seem to compile the test program.  Guessing...)" >&4
+                rp="What is the size of a long double (in bytes)?"
+                . ./myread
+                longdblsize="$ans"
+        fi
+        if $test "X$doublesize" = "X$longdblsize"; then
+                echo "That isn't any different from an ordinary double."
+                echo "I'll keep your setting anyway, but you may see some"
+                echo "harmless compilation warnings."
+        fi      
+        ;;
+esac
+$rm -f try.* try
+
+: determine the architecture name
+echo " "
+if xxx=`./loc arch blurfl $pth`; $test -f "$xxx"; then
+        tarch=`arch`"-$osname"
+elif xxx=`./loc uname blurfl $pth`; $test -f "$xxx" ; then
+        if uname -m > tmparch 2>&1 ; then
+                tarch=`$sed -e 's/ *$//' -e 's/ /_/g' \
+                        -e 's/$/'"-$osname/" tmparch`
+        else
+                tarch="$osname"
+        fi
+        $rm -f tmparch
+else
+        tarch="$osname"
+fi
+case "$myarchname" in
+''|"$tarch") ;;
+*)
+        echo "(Your architecture name used to be $myarchname.)"
+        archname=''
+        ;;
+esac
+case "$targetarch" in
+'') ;;
+*)  archname=`echo $targetarch|sed 's,^[^-]*-,,'` ;;
+esac
+myarchname="$tarch"
+case "$archname" in
+'') dflt="$tarch";;
+*) dflt="$archname";;
+esac
+rp='What is your architecture name'
+. ./myread
+archname="$ans"
+case "$usethreads" in
+$define)
+        echo "Threads selected." >&4
+        case "$archname" in
+        *-thread*) echo "...and architecture name already has -thread." >&4
+                ;;
+        *)      archname="$archname-thread"
+                echo "...setting architecture name to $archname." >&4
+                ;;
+        esac
+        ;;
+esac
+case "$usemultiplicity" in
+$define)
+        echo "Multiplicity selected." >&4
+        case "$archname" in
+        *-multi*) echo "...and architecture name already has -multi." >&4
+                ;;
+        *)      archname="$archname-multi"
+                echo "...setting architecture name to $archname." >&4
+                ;;
+        esac
+        ;;
+esac
+case "$use64bitint$use64bitall" in
+*"$define"*)
+        case "$archname64" in
+        '')
+                echo "This architecture is naturally 64-bit, not changing architecture name." >&4
+                ;;
+        *)
+                case "$use64bitint" in
+                "$define") echo "64 bit integers selected." >&4 ;;
+                esac
+                case "$use64bitall" in
+                "$define") echo "Maximal 64 bitness selected." >&4 ;;
+                esac
+                case "$archname" in
+                *-$archname64*) echo "...and architecture name already has $archname64." >&4
+                        ;;
+                *)      archname="$archname-$archname64"
+                        echo "...setting architecture name to $archname." >&4
+                        ;;
+                esac
+                ;;
+        esac
+esac
+case "$uselongdouble" in
+$define)
+        echo "Long doubles selected." >&4
+        case "$longdblsize" in
+        $doublesize)
+                echo "...but long doubles are equal to doubles, not changing architecture name." >&4
+                ;;
+        *)
+                case "$archname" in
+                *-ld*) echo "...and architecture name already has -ld." >&4
+                        ;;
+                *)      archname="$archname-ld"
+                        echo "...setting architecture name to $archname." >&4
+                        ;;
+                esac
+                ;;
+        esac
+        ;;
+esac
+case "$useperlio" in
+$define)
+        echo "Perlio selected." >&4
+        ;;
+*)
+        echo "Perlio not selected, using stdio." >&4
+        case "$archname" in
+        *-stdio*) echo "...and architecture name already has -stdio." >&4
+                ;;
+        *)      archname="$archname-stdio"
+                echo "...setting architecture name to $archname." >&4
+                ;;
+        esac
+        ;;
+esac
+if $test -f archname.cbu; then
+        echo "Your platform has some specific hints for architecture name, using them..."
+        . ./archname.cbu
+fi
+
+: determine root of directory hierarchy where package will be installed.
+case "$prefix" in
+'')
+        dflt=`./loc . /usr/local /usr/local /local /opt /usr`
+        ;;
+*?/)
+        dflt=`echo "$prefix" | sed 's/.$//'`
+        ;;
+*)
+        dflt="$prefix"
+        ;;
+esac
+$cat <<EOM
+
+By default, $package will be installed in $dflt/bin, manual pages
+under $dflt/man, etc..., i.e. with $dflt as prefix for all
+installation directories. Typically this is something like /usr/local.
+If you wish to have binaries under /usr/bin but other parts of the
+installation under /usr/local, that's ok: you will be prompted
+separately for each of the installation directories, the prefix being
+only used to set the defaults.
+
+EOM
+fn=d~
+rp='Installation prefix to use?'
+. ./getfile
+oldprefix=''
+case "$prefix" in
+'') ;;
+*)
+        case "$ans" in
+        "$prefix") ;;
+        *) oldprefix="$prefix";;
+        esac
+        ;;
+esac
+prefix="$ans"
+prefixexp="$ansexp"
+
+case "$afsroot" in
+'')     afsroot=/afs ;;
+*)      afsroot=$afsroot ;;
+esac
+
+: is AFS running?
+echo " "
+case "$afs" in
+$define|true)   afs=true ;;
+$undef|false)   afs=false ;;
+*)      if test -d $afsroot; then
+                afs=true
+        else
+                afs=false
+        fi
+        ;;
+esac
+if $afs; then
+        echo "AFS may be running... I'll be extra cautious then..." >&4
+else
+        echo "AFS does not seem to be running..." >&4
+fi
+
+: determine installation prefix for where package is to be installed.
+if $afs; then 
+$cat <<EOM
+
+Since you are running AFS, I need to distinguish the directory in which
+files will reside from the directory in which they are installed (and from
+which they are presumably copied to the former directory by occult means).
+
+EOM
+        case "$installprefix" in
+        '') dflt=`echo $prefix | sed 's#^/afs/#/afs/.#'`;;
+        *) dflt="$installprefix";;
+        esac
+else
+$cat <<EOM
+
+In some special cases, particularly when building $package for distribution,
+it is convenient to distinguish the directory in which files should be
+installed from the directory ($prefix) in which they will
+eventually reside.  For most users, these two directories are the same.
+
+EOM
+        case "$installprefix" in
+        '') dflt=$prefix ;;
+        *) dflt=$installprefix;;
+        esac
+fi
+fn=d~
+rp='What installation prefix should I use for installing files?'
+. ./getfile
+installprefix="$ans"
+installprefixexp="$ansexp"
+
+: set the prefixit variable, to compute a suitable default value
+prefixit='case "$3" in
+""|none)
+        case "$oldprefix" in
+        "") eval "$1=\"\$$2\"";;
+        *)
+                case "$3" in
+                "") eval "$1=";;
+                none)
+                        eval "tp=\"\$$2\"";
+                        case "$tp" in
+                        ""|" ") eval "$1=\"\$$2\"";;
+                        *) eval "$1=";;
+                        esac;;
+                esac;;
+        esac;;
+*)
+        eval "tp=\"$oldprefix-\$$2-\""; eval "tp=\"$tp\"";
+        case "$tp" in
+        --|/*--|\~*--) eval "$1=\"$prefix/$3\"";;
+        /*-$oldprefix/*|\~*-$oldprefix/*)
+                eval "$1=\`echo \$$2 | sed \"s,^$oldprefix,$prefix,\"\`";;
+        *) eval "$1=\"\$$2\"";;
+        esac;;
+esac'
+
+: get the patchlevel
+echo " "
+echo "Getting the current patchlevel..." >&4
+if $test -r $rsrc/patchlevel.h;then
+        revision=`awk '/define[         ]+PERL_REVISION/ {print $3}' $rsrc/patchlevel.h`
+        patchlevel=`awk '/define[       ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
+        subversion=`awk '/define[       ]+PERL_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
+        api_revision=`awk '/define[     ]+PERL_API_REVISION/ {print $3}' $rsrc/patchlevel.h`
+        api_version=`awk '/define[      ]+PERL_API_VERSION/ {print $3}' $rsrc/patchlevel.h`
+        api_subversion=`awk '/define[   ]+PERL_API_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
+       perl_patchlevel=`grep ',"DEVEL[0-9][0-9]*"' $rsrc/patchlevel.h|sed 's/[^0-9]//g'`
+else
+        revision=0
+        patchlevel=0
+        subversion=0
+        api_revision=0
+        api_version=0
+        api_subversion=0
+        perl_patchlevel=0
+        $echo "(You do not have patchlevel.h.  Eek.)"
+fi
+if $test -r $rsrc/.patch ; then  
+        if $test "`cat $rsrc/.patch`" -gt "$perl_patchlevel" ; then
+                perl_patchlevel=`cat $rsrc/.patch`
+        fi
+fi
+: Define a handy string here to avoid duplication in myconfig.SH and configpm.
+version_patchlevel_string="version $patchlevel subversion $subversion"
+case "$perl_patchlevel" in
+0|'') ;;
+*) version_patchlevel_string="$version_patchlevel_string patch $perl_patchlevel" ;;
+esac
+
+$echo "(You have $package $version_patchlevel_string.)"
+
+case "$osname" in
+dos|vms)
+        : XXX Should be a Configure test for double-dots in filenames.
+        version=`echo $revision $patchlevel $subversion | \
+                 $awk '{ printf "%d_%d_%d\n", $1, $2, $3 }'`
+        api_versionstring=`echo $api_revision $api_version $api_subversion | \
+                 $awk '{ printf "%d_%d_%d\n", $1, $2, $3 }'`
+        ;;
+*)
+        version=`echo $revision $patchlevel $subversion | \
+                 $awk '{ printf "%d.%d.%d\n", $1, $2, $3 }'`
+        api_versionstring=`echo $api_revision $api_version $api_subversion | \
+                 $awk '{ printf "%d.%d.%d\n", $1, $2, $3 }'`
+        ;;
+esac
+: Special case the 5.005_xx maintenance series, which used 5.005
+: without any subversion label as a subdirectory in $sitelib
+if test "${api_revision}${api_version}${api_subversion}" = "550"; then
+        api_versionstring='5.005'
+fi
+
+: determine installation style
+: For now, try to deduce it from prefix unless it is already set.
+: Reproduce behavior of 5.005 and earlier, maybe drop that in 5.7.
+case "$installstyle" in
+'')     case "$prefix" in
+                *perl*) dflt='lib';;
+                *) dflt='lib/perl5' ;;
+        esac
+        ;;
+*)      dflt="$installstyle" ;;
+esac
+: Probably not worth prompting for this since we prompt for all
+: the directories individually, and the prompt would be too long and
+: confusing anyway.
+installstyle=$dflt
+
+: determine where private library files go
+: Usual default is /usr/local/lib/perl5/$version.
+: Also allow things like /opt/perl/lib/$version, since 
+: /opt/perl/lib/perl5... would be redundant.
+: The default "style" setting is made in installstyle.U
+case "$installstyle" in
+*lib/perl5*) set dflt privlib lib/$package/$version ;;
+*)       set dflt privlib lib/$version ;;
+esac
+eval $prefixit
+$cat <<EOM
+
+There are some auxiliary files for $package that need to be put into a
+private library directory that is accessible by everyone.
+
+EOM
+fn=d~+
+rp='Pathname where the private library files will reside?'
+. ./getfile
+privlib="$ans"
+privlibexp="$ansexp"
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installprivlib=`echo $privlibexp | sed "s#^$prefix#$installprefix#"`
+else
+        installprivlib="$privlibexp"
+fi
+
+: set the prefixup variable, to restore leading tilda escape
+prefixup='case "$prefixexp" in
+"$prefix") ;;
+*) eval "$1=\`echo \$$1 | sed \"s,^$prefixexp,$prefix,\"\`";;
+esac'
+
+: determine where public architecture dependent libraries go
+set archlib archlib
+eval $prefixit
+: privlib default is /usr/local/lib/$package/$version
+: archlib default is /usr/local/lib/$package/$version/$archname
+: privlib may have an optional trailing /share.
+tdflt=`echo $privlib | $sed 's,/share$,,'`
+tdflt=$tdflt/$archname
+case "$archlib" in
+'')     dflt=$tdflt
+        ;;
+*)      dflt="$archlib"
+    ;;
+esac
+$cat <<EOM
+
+$spackage contains architecture-dependent library files.  If you are
+sharing libraries in a heterogeneous environment, you might store
+these files in a separate location.  Otherwise, you can just include
+them with the rest of the public library files.
+
+EOM
+fn=d+~
+rp='Where do you want to put the public architecture-dependent libraries?'
+. ./getfile
+archlib="$ans"
+archlibexp="$ansexp"
+if $test X"$archlib" = X"$privlib"; then
+        d_archlib="$undef"
+else
+        d_archlib="$define"
+fi
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installarchlib=`echo $archlibexp | sed "s#^$prefix#$installprefix#"`
+else
+        installarchlib="$archlibexp"
+fi
+
+: see if setuid scripts can be secure
+$cat <<EOM
+
+Some kernels have a bug that prevents setuid #! scripts from being
+secure.  Some sites have disabled setuid #! scripts because of this.
+
+First let's decide if your kernel supports secure setuid #! scripts.
+(If setuid #! scripts would be secure but have been disabled anyway,
+don't say that they are secure if asked.)
+
+EOM
+
+val="$undef"
+if $test -d /dev/fd; then
+        echo "#!$ls" >reflect
+        chmod +x,u+s reflect
+        ./reflect >flect 2>&1
+        if $contains "/dev/fd" flect >/dev/null; then
+                echo "Congratulations, your kernel has secure setuid scripts!" >&4
+                val="$define"
+        else
+                $cat <<EOM
+If you are not sure if they are secure, I can check but I'll need a
+username and password different from the one you are using right now.
+If you don't have such a username or don't want me to test, simply
+enter 'none'.
+
+EOM
+                rp='Other username to test security of setuid scripts with?'
+                dflt='none'
+                . ./myread
+                case "$ans" in
+                n|none)
+                        case "$d_suidsafe" in
+                        '')     echo "I'll assume setuid scripts are *not* secure." >&4
+                                dflt=n;;
+                        "$undef")
+                                echo "Well, the $hint value is *not* secure." >&4
+                                dflt=n;;
+                        *)      echo "Well, the $hint value *is* secure." >&4
+                                dflt=y;;
+                        esac
+                        ;;
+                *)
+                        $rm -f reflect flect
+                        echo "#!$ls" >reflect
+                        chmod +x,u+s reflect
+                        echo >flect
+                        chmod a+w flect
+                        echo '"su" will (probably) prompt you for '"$ans's password."
+                        su $ans -c './reflect >flect'
+                        if $contains "/dev/fd" flect >/dev/null; then
+                                echo "Okay, it looks like setuid scripts are secure." >&4
+                                dflt=y
+                        else
+                                echo "I don't think setuid scripts are secure." >&4
+                                dflt=n
+                        fi
+                        ;;
+                esac
+                rp='Does your kernel have *secure* setuid scripts?'
+                . ./myread
+                case "$ans" in
+                [yY]*)  val="$define";;
+                *)      val="$undef";;
+                esac
+        fi
+else
+        echo "I don't think setuid scripts are secure (no /dev/fd directory)." >&4
+        echo "(That's for file descriptors, not floppy disks.)"
+        val="$undef"
+fi
+set d_suidsafe
+eval $setvar
+
+$rm -f reflect flect
+
+: now see if they want to do setuid emulation
+echo " "
+val="$undef"
+case "$d_suidsafe" in
+"$define")
+        val="$undef"
+        echo "No need to emulate SUID scripts since they are secure here." >&4
+        ;;
+*)
+        $cat <<EOM
+Some systems have disabled setuid scripts, especially systems where
+setuid scripts cannot be secure.  On systems where setuid scripts have
+been disabled, the setuid/setgid bits on scripts are currently
+useless.  It is possible for $package to detect those bits and emulate
+setuid/setgid in a secure fashion.  This emulation will only work if
+setuid scripts have been disabled in your kernel.
+
+EOM
+        case "$d_dosuid" in
+        "$define") dflt=y ;;
+        *) dflt=n ;;
+        esac
+        rp="Do you want to do setuid/setgid emulation?"
+        . ./myread
+        case "$ans" in
+        [yY]*)  val="$define";;
+        *)      val="$undef";;
+        esac
+        ;;
+esac
+set d_dosuid
+eval $setvar
+
+: see if this is a malloc.h system
+: we want a real compile instead of Inhdr because some systems have a
+: malloc.h that just gives a compile error saying to use stdlib.h instead
+echo " "
+$cat >try.c <<EOCP
+#include <stdlib.h>
+#include <malloc.h>
+int main () { return 0; }
+EOCP
+set try
+if eval $compile; then
+    echo "<malloc.h> found." >&4
+    val="$define"
+else
+    echo "<malloc.h> NOT found." >&4
+    val="$undef"
+fi
+$rm -f try.c try
+set i_malloc
+eval $setvar
+
+: check for void type
+echo " "
+echo "Checking to see how well your C compiler groks the void type..." >&4
+case "$voidflags" in
+'')
+        $cat >try.c <<EOCP
+#$i_stdlib I_STDLIB
+#ifdef I_STDLIB
+#include <stdlib.h>
+#endif
+#if TRY & 1
+void sub() {
+#else
+sub() {
+#endif
+        extern void moo();      /* function returning void */
+        void (*goo)();          /* ptr to func returning void */
+#if TRY & 8
+        void *hue;              /* generic ptr */
+#endif
+#if TRY & 2
+        void (*foo[10])();
+#endif
+
+#if TRY & 4
+        if(goo == moo) {
+                exit(0);
+        }
+#endif
+        exit(0);
+}
+int main() { sub(); }
+EOCP
+        if $cc $ccflags -c -DTRY=$defvoidused try.c >.out 2>&1 ; then
+                voidflags=$defvoidused
+        echo "Good.  It appears to support void to the level $package wants.">&4
+                if $contains warning .out >/dev/null 2>&1; then
+                        echo "However, you might get some warnings that look like this:"
+                        $cat .out
+                fi
+        else
+echo "Hmm, your compiler has some difficulty with void. Checking further..." >&4
+                if $cc $ccflags -c -DTRY=1 try.c >/dev/null 2>&1; then
+                        echo "It supports 1..."
+                        if $cc $ccflags -c -DTRY=3 try.c >/dev/null 2>&1; then
+                                echo "It also supports 2..."
+                                if $cc $ccflags -c -DTRY=7 try.c >/dev/null 2>&1; then
+                                        voidflags=7
+                                        echo "And it supports 4 but not 8 definitely."
+                                else
+                                        echo "It doesn't support 4..."
+                                        if $cc $ccflags -c -DTRY=11 try.c >/dev/null 2>&1; then
+                                                voidflags=11
+                                                echo "But it supports 8."
+                                        else
+                                                voidflags=3
+                                                echo "Neither does it support 8."
+                                        fi
+                                fi
+                        else
+                                echo "It does not support 2..."
+                                if $cc $ccflags -c -DTRY=13 try.c >/dev/null 2>&1; then
+                                        voidflags=13
+                                        echo "But it supports 4 and 8."
+                                else
+                                        if $cc $ccflags -c -DTRY=5 try.c >/dev/null 2>&1; then
+                                                voidflags=5
+                                                echo "And it supports 4 but has not heard about 8."
+                                        else
+                                                echo "However it supports 8 but not 4."
+                                        fi
+                                fi
+                        fi
+                else
+                        echo "There is no support at all for void."
+                        voidflags=0
+                fi
+        fi
+esac
+case "$voidflags" in
+"$defvoidused") ;;
+*)      $cat >&4 <<'EOM'
+  Support flag bits are:
+    1: basic void declarations.
+    2: arrays of pointers to functions returning void.
+    4: operations between pointers to and addresses of void functions.
+    8: generic void pointers.
+EOM
+        dflt="$voidflags";
+        rp="Your void support flags add up to what?"
+        . ./myread
+        voidflags="$ans"
+        ;;
+esac
+$rm -f try.* .out
+
+: check for length of pointer
+echo " "
+case "$ptrsize" in
+'')
+        echo "Checking to see how big your pointers are..." >&4
+        if test "$voidflags" -gt 7; then
+                echo '#define VOID_PTR char *' > try.c
+        else
+                echo '#define VOID_PTR void *' > try.c
+        fi
+        $cat >>try.c <<EOCP
+#include <stdio.h>
+#$i_stdlib I_STDLIB
+#ifdef I_STDLIB
+#include <stdlib.h>
+#endif
+int main()
+{
+    printf("%d\n", (int)sizeof(VOID_PTR));
+    exit(0);
+}
+EOCP
+        set try
+        if eval $compile_ok; then
+                ptrsize=`$run ./try`
+                echo "Your pointers are $ptrsize bytes long."
+        else
+                dflt='4'
+                echo "(I can't seem to compile the test program.  Guessing...)" >&4
+                rp="What is the size of a pointer (in bytes)?"
+                . ./myread
+                ptrsize="$ans"
+        fi
+        ;;
+esac
+$rm -f try.c try
+case "$use64bitall" in
+"$define"|true|[yY]*)
+        case "$ptrsize" in
+        4)      cat <<EOM >&4
+
+*** You have chosen a maximally 64-bit build,
+*** but your pointers are only 4 bytes wide.
+*** Please rerun Configure without -Duse64bitall.
+EOM
+                case "$d_quad" in
+                define)
+                        cat <<EOM >&4
+*** Since you have quads, you could possibly try with -Duse64bitint.
+EOM
+                        ;;
+                esac
+                cat <<EOM >&4
+*** Cannot continue, aborting.
+
+EOM
+
+                exit 1
+                ;;
+        esac
+        ;;
+esac
+
+
+: determine which malloc to compile in
+echo " "
+case "$usemymalloc" in
+[yY]*|true|$define)     dflt='y' ;;
+[nN]*|false|$undef)     dflt='n' ;;
+*)      case "$ptrsize" in
+        4) dflt='y' ;;
+        *) dflt='n' ;;
+        esac
+        ;;
+esac
+rp="Do you wish to attempt to use the malloc that comes with $package?"
+. ./myread
+usemymalloc="$ans"
+case "$ans" in
+y*|true)
+        usemymalloc='y'
+        mallocsrc='malloc.c'
+        mallocobj="malloc$_o"
+        d_mymalloc="$define"
+        case "$libs" in
+        *-lmalloc*)
+                : Remove malloc from list of libraries to use
+                echo "Removing unneeded -lmalloc from library list" >&4
+                set `echo X $libs | $sed -e 's/-lmalloc / /' -e 's/-lmalloc$//'`
+                shift
+                libs="$*"
+                echo "libs = $libs" >&4
+                ;;
+        esac
+        ;;
+*)
+        usemymalloc='n'
+        mallocsrc=''
+        mallocobj=''
+        d_mymalloc="$undef"
+        ;;
+esac
+
+: compute the return types of malloc and free
+echo " "
+$cat >malloc.c <<END
+#$i_malloc I_MALLOC
+#$i_stdlib I_STDLIB
+#include <stdio.h>
+#include <sys/types.h>
+#ifdef I_MALLOC
+#include <malloc.h>
+#endif
+#ifdef I_STDLIB
+#include <stdlib.h>
+#endif
+#ifdef TRY_MALLOC
+void *malloc();
+#endif
+#ifdef TRY_FREE
+void free();
+#endif
+END
+case "$malloctype" in
+'')
+        if $cc $ccflags -c -DTRY_MALLOC malloc.c >/dev/null 2>&1; then
+                malloctype='void *'
+        else
+                malloctype='char *'
+        fi
+        ;;
+esac
+echo "Your system wants malloc to return '$malloctype', it would seem." >&4
+
+case "$freetype" in
+'')
+        if $cc $ccflags -c -DTRY_FREE malloc.c >/dev/null 2>&1; then
+                freetype='void'
+        else
+                freetype='int'
+        fi
+        ;;
+esac
+echo "Your system uses $freetype free(), it would seem." >&4
+$rm -f malloc.[co]
+$cat <<EOM
+
+After $package is installed, you may wish to install various
+add-on modules and utilities.  Typically, these add-ons will
+be installed under $prefix with the rest
+of this package.  However, you may wish to install such add-ons
+elsewhere under a different prefix.
+
+If you do not wish to put everything under a single prefix, that's
+ok.  You will be prompted for the individual locations; this siteprefix
+is only used to suggest the defaults.
+
+The default should be fine for most people.
+
+EOM
+fn=d~+
+rp='Installation prefix to use for add-on modules and utilities?'
+: XXX Here might be another good place for an installstyle setting.
+case "$siteprefix" in
+'') dflt=$prefix ;;
+*)  dflt=$siteprefix ;;
+esac
+. ./getfile
+: XXX Prefixit unit does not yet support siteprefix and vendorprefix
+oldsiteprefix=''
+case "$siteprefix" in
+'') ;;
+*)      case "$ans" in
+        "$prefix") ;;
+        *) oldsiteprefix="$prefix";;
+        esac
+        ;;
+esac
+siteprefix="$ans"
+siteprefixexp="$ansexp"
+
+: determine where site specific libraries go.
+: Usual default is /usr/local/lib/perl5/site_perl/$version
+: The default "style" setting is made in installstyle.U
+: XXX No longer works with Prefixit stuff.
+prog=`echo $package | $sed 's/-*[0-9.]*$//'`
+case "$sitelib" in
+'') case "$installstyle" in
+        *lib/perl5*) dflt=$siteprefix/lib/$package/site_$prog/$version ;;
+        *)       dflt=$siteprefix/lib/site_$prog/$version ;;
+        esac
+        ;;
+*)      dflt="$sitelib"
+        ;;
+esac
+$cat <<EOM
+
+The installation process will create a directory for
+site-specific extensions and modules.  Most users find it convenient
+to place all site-specific files in this directory rather than in the
+main distribution directory.
+
+EOM
+fn=d~+
+rp='Pathname for the site-specific library files?'
+. ./getfile
+sitelib="$ans"
+sitelibexp="$ansexp"
+sitelib_stem=`echo "$sitelibexp" | sed "s,/$version$,,"`
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installsitelib=`echo $sitelibexp | $sed "s#^$prefix#$installprefix#"`
+else
+        installsitelib="$sitelibexp"
+fi
+
+: determine where site specific architecture-dependent libraries go.
+: sitelib  default is /usr/local/lib/perl5/site_perl/$version
+: sitearch default is /usr/local/lib/perl5/site_perl/$version/$archname
+: sitelib may have an optional trailing /share.
+case "$sitearch" in
+'')     dflt=`echo $sitelib | $sed 's,/share$,,'`
+        dflt="$dflt/$archname"
+        ;;
+*)      dflt="$sitearch"
+        ;;
+esac
+set sitearch sitearch none
+eval $prefixit
+$cat <<EOM
+
+The installation process will also create a directory for
+architecture-dependent site-specific extensions and modules.
+
+EOM
+fn=d~+
+rp='Pathname for the site-specific architecture-dependent library files?'
+. ./getfile
+sitearch="$ans"
+sitearchexp="$ansexp"
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installsitearch=`echo $sitearchexp | sed "s#^$prefix#$installprefix#"`
+else
+        installsitearch="$sitearchexp"
+fi
+
+$cat <<EOM
+
+The installation process will also create a directory for
+vendor-supplied add-ons.  Vendors who supply perl with their system
+may find it convenient to place all vendor-supplied files in this
+directory rather than in the main distribution directory.  This will
+ease upgrades between binary-compatible maintenance versions of perl.
+
+Of course you may also use these directories in whatever way you see
+fit.  For example, you might use them to access modules shared over a
+company-wide network.
+
+The default answer should be fine for most people.
+This causes further questions about vendor add-ons to be skipped
+and no vendor-specific directories will be configured for perl.
+
+EOM
+rp='Do you want to configure vendor-specific add-on directories?'
+case "$usevendorprefix" in
+define|true|[yY]*) dflt=y ;;
+*)      : User may have set vendorprefix directly on Configure command line.
+        case "$vendorprefix" in
+        ''|' ') dflt=n ;;
+        *)      dflt=y ;;
+        esac
+        ;;
+esac
+. ./myread
+case "$ans" in
+[yY]*)  fn=d~+
+        rp='Installation prefix to use for vendor-supplied add-ons?'
+        case "$vendorprefix" in
+        '') dflt='' ;;
+        *)  dflt=$vendorprefix ;;
+        esac
+        . ./getfile
+        : XXX Prefixit unit does not yet support siteprefix and vendorprefix
+        oldvendorprefix=''
+        case "$vendorprefix" in
+        '') ;;
+        *)      case "$ans" in
+                "$prefix") ;;
+                *) oldvendorprefix="$prefix";;
+                esac
+                ;;
+        esac
+        usevendorprefix="$define"
+        vendorprefix="$ans"
+        vendorprefixexp="$ansexp"
+        ;;
+*)      usevendorprefix="$undef"
+        vendorprefix=''
+        vendorprefixexp=''
+        ;;
+esac
+
+case "$vendorprefix" in
+'')     d_vendorlib="$undef"
+        vendorlib=''
+        vendorlibexp=''
+        ;;
+*)      d_vendorlib="$define"
+        : determine where vendor-supplied modules go.
+        : Usual default is /usr/local/lib/perl5/vendor_perl/$version
+        case "$vendorlib" in
+        '')
+                prog=`echo $package | $sed 's/-*[0-9.]*$//'`
+                case "$installstyle" in
+                *lib/perl5*) dflt=$vendorprefix/lib/$package/vendor_$prog/$version ;;
+                *)           dflt=$vendorprefix/lib/vendor_$prog/$version ;;
+                esac
+                ;;
+        *)      dflt="$vendorlib"
+                ;;
+        esac
+        fn=d~+
+        rp='Pathname for the vendor-supplied library files?'
+        . ./getfile
+        vendorlib="$ans"
+        vendorlibexp="$ansexp"
+        ;;
+esac
+vendorlib_stem=`echo "$vendorlibexp" | sed "s,/$version$,,"`
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installvendorlib=`echo $vendorlibexp | $sed "s#^$prefix#$installprefix#"`
+else
+        installvendorlib="$vendorlibexp"
+fi
+
+case "$vendorprefix" in
+'')     d_vendorarch="$undef"
+        vendorarch=''
+        vendorarchexp=''
+        ;;
+*)      d_vendorarch="$define"
+        : determine where vendor-supplied architecture-dependent libraries go.
+        : vendorlib  default is /usr/local/lib/perl5/vendor_perl/$version
+        : vendorarch default is /usr/local/lib/perl5/vendor_perl/$version/$archname
+        : vendorlib may have an optional trailing /share.
+        case "$vendorarch" in
+        '')     dflt=`echo $vendorlib | $sed 's,/share$,,'`
+                dflt="$dflt/$archname"
+                ;;
+        *)      dflt="$vendorarch" ;;
+        esac
+        fn=d~+
+        rp='Pathname for vendor-supplied architecture-dependent files?'
+        . ./getfile
+        vendorarch="$ans"
+        vendorarchexp="$ansexp"
+        ;;
+esac
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installvendorarch=`echo $vendorarchexp | sed "s#^$prefix#$installprefix#"`
+else
+        installvendorarch="$vendorarchexp"
+fi
+
+: Final catch-all directories to search
+$cat <<EOM
+
+Lastly, you can have perl look in other directories for extensions and
+modules in addition to those already specified.
+These directories will be searched after 
+        $sitearch 
+        $sitelib 
+EOM
+test X"$vendorlib" != "X" && echo '     ' $vendorlib
+test X"$vendorarch" != "X" && echo '    ' $vendorarch
+echo ' '
+case "$otherlibdirs" in
+''|' ') dflt='none' ;;
+*)      dflt="$otherlibdirs" ;;
+esac
+$cat <<EOM
+Enter a colon-separated set of extra paths to include in perl's @INC
+search path, or enter 'none' for no extra paths.
+
+EOM
+
+rp='Colon-separated list of additional directories for perl to search?'
+. ./myread
+case "$ans" in
+' '|''|none)    otherlibdirs=' ' ;;     
+*)      otherlibdirs="$ans" ;;
+esac
+case "$otherlibdirs" in
+' ') val=$undef ;;
+*)      val=$define ;;
+esac
+set d_perl_otherlibdirs
+eval $setvar
+
+: Cruising for prototypes
+echo " "
+echo "Checking out function prototypes..." >&4
+$cat >prototype.c <<EOCP
+#$i_stdlib I_STDLIB
+#ifdef I_STDLIB
+#include <stdlib.h>
+#endif
+int main(int argc, char *argv[]) {
+        exit(0);}
+EOCP
+if $cc $ccflags -c prototype.c >prototype.out 2>&1 ; then
+        echo "Your C compiler appears to support function prototypes."
+        val="$define"
+else
+        echo "Your C compiler doesn't seem to understand function prototypes."
+        val="$undef"
+fi
+set prototype
+eval $setvar
+$rm -f prototype*
+
+case "$prototype" in
+"$define") ;;
+*)      ansi2knr='ansi2knr'
+        echo " "
+        cat <<EOM >&4
+
+$me:  FATAL ERROR:
+This version of $package can only be compiled by a compiler that 
+understands function prototypes.  Unfortunately, your C compiler 
+        $cc $ccflags
+doesn't seem to understand them.  Sorry about that.
+
+If GNU cc is available for your system, perhaps you could try that instead.  
+
+Eventually, we hope to support building Perl with pre-ANSI compilers.
+If you would like to help in that effort, please contact <perlbug@perl.org>.
+
+Aborting Configure now.
+EOM
+        exit 2
+        ;;
+esac
+
+: determine where public executables go
+echo " "
+set dflt bin bin
+eval $prefixit
+fn=d~
+rp='Pathname where the public executables will reside?'
+. ./getfile
+if $test "X$ansexp" != "X$binexp"; then
+        installbin=''
+fi
+bin="$ans"
+binexp="$ansexp"
+: Change installation prefix, if necessary.
+: XXX Bug? -- ignores Configure -Dinstallprefix setting.
+if $test X"$prefix" != X"$installprefix"; then
+        installbin=`echo $binexp | sed "s#^$prefix#$installprefix#"`
+else
+        installbin="$binexp"
+fi
+
+echo " "
+case "$extras" in
+'') dflt='n';;
+*) dflt='y';;
+esac
+cat <<EOM
+Perl can be built with extra modules or bundles of modules which
+will be fetched from the CPAN and installed alongside Perl.
+
+Notice that you will need access to the CPAN; either via the Internet,
+or a local copy, for example a CD-ROM or a local CPAN mirror.  (You will
+be asked later to configure the CPAN.pm module which will in turn do
+the installation of the rest of the extra modules or bundles.)
+
+Notice also that if the modules require any external software such as
+libraries and headers (the libz library and the zlib.h header for the
+Compress::Zlib module, for example) you MUST have any such software
+already installed, this configuration process will NOT install such
+things for you.
+
+If this doesn't make any sense to you, just accept the default '$dflt'.
+EOM
+rp='Install any extra modules (y or n)?'
+. ./myread
+case "$ans" in
+y|Y)
+        cat <<EOM
+
+Please list any extra modules or bundles to be installed from CPAN,
+with spaces between the names.  The names can be in any format the
+'install' command of CPAN.pm will understand.  (Answer 'none',
+without the quotes, to install no extra modules or bundles.)
+EOM
+        rp='Extras?'
+        dflt="$extras"
+        . ./myread
+        extras="$ans"
+esac
+case "$extras" in
+''|'none')
+        val=''
+        $rm -f ../extras.lst
+        ;;
+*)      echo "(Saving the list of extras for later...)"
+        echo "$extras" > ../extras.lst
+        val="'$extras'"
+        ;;
+esac
+set extras
+eval $setvar
+echo " "
+
+: determine where html pages for programs go
+set html1dir html1dir none
+eval $prefixit
+$cat <<EOM
+
+If you wish to install html files for programs in $spackage, indicate 
+the appropriate directory here.  To skip installing html files,
+answer "none".
+EOM
+case "$html1dir" in
+''|none|$undef|' ') dflt=none ;;
+*) dflt=$html1dir ;;
+esac
+fn=dn+~
+rp="Directory for the main $spackage html pages?"
+. ./getfile
+html1dir="$ans"
+html1direxp="$ansexp"
+: Use ' ' for none so value is preserved next time through Configure
+$test X"$html1dir" = "X" && html1dir=' '
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installhtml1dir=`echo $html1direxp | sed "s#^$prefix#$installprefix#"`
+else
+        installhtml1dir="$html1direxp"
+fi
+
+: determine where html pages for libraries and modules go
+set html3dir html3dir none
+eval $prefixit
+$cat <<EOM
+
+If you wish to install html files for modules associated with $spackage,
+indicate the appropriate directory here.  To skip installing html files,
+answer "none".
+EOM
+: There is no obvious default.  If they have specified html1dir, then
+: try to key off that, possibly changing .../html1 into .../html3.
+case "$html3dir" in
+'') html3dir=`echo "$html1dir" | $sed 's/1$/3$/'` ;;
+*) dflt=$html3dir ;;
+esac
+fn=dn+~
+rp="Directory for the $spackage module html pages?"
+. ./getfile
+html3dir="$ans"
+html3direxp="$ansexp"
+: Use ' ' for none so value is preserved next time through Configure
+$test X"$html3dir" = "X" && html3dir=' '
+: Change installation prefix, if necessary.
+if $test X"$prefix" != X"$installprefix"; then
+        installhtml3dir=`echo $html3direxp | sed "s#^$prefix#$installprefix#"`
+else
+        installhtml3dir="$html3direxp"
+fi
+
+: Find perl5.005 or later.
+echo "Looking for a previously installed perl5.005 or later... "
+case "$perl5" in
+'')     for tdir in `echo "$binexp$path_sep$PATH" | $sed "s/$path_sep/ /g"`; do
+                : Check if this perl is recent and can load a simple module
+                if $test -x $tdir/perl$exe_ext && $tdir/perl -Mless -e 'use 5.005;' >/dev/null 2>&1; then
+                        perl5=$tdir/perl
+                        break;
+                elif $test -x $tdir/perl5$exe_ext && $tdir/perl5 -Mless -e 'use 5.005;' >/dev/null 2>&1; then
+                        perl5=$tdir/perl5
+                        break;
+                fi
+        done
+        ;;
+*)      perl5="$perl5"
+        ;;
+esac
+case "$perl5" in
+'')     echo "None found.  That's ok.";;
+*)      echo "Using $perl5." ;;
+esac
+
+: Determine list of previous versions to include in @INC
+$cat > getverlist <<EOPL
+#!$perl5 -w
+use File::Basename;
+\$api_versionstring = "$api_versionstring";
+\$version = "$version";
+\$stem = "$sitelib_stem";
+\$archname = "$archname";
+EOPL
+        $cat >> getverlist <<'EOPL'
+# Can't have leading @ because metaconfig interprets it as a command!
+;@inc_version_list=();
+# XXX Redo to do opendir/readdir? 
+if (-d $stem) {
+    chdir($stem);
+    ;@candidates = glob("5.*");
+}
+else {
+    ;@candidates = ();
+}
+
+# XXX ToDo:  These comparisons must be reworked when two-digit
+# subversions come along, so that 5.7.10 compares as greater than
+# 5.7.3!  By that time, hope that 5.6.x is sufficiently
+# widespread that we can use the built-in version vectors rather
+# than reinventing them here.  For 5.6.0, however, we must
+# assume this script will likely be run by 5.005_0x.  --AD 1/2000.
+foreach $d (@candidates) {
+    if ($d lt $version) {
+        if ($d ge $api_versionstring) {
+            unshift(@inc_version_list, grep { -d } "$d/$archname", $d);
+        }
+        elsif ($d ge "5.005") {
+            unshift(@inc_version_list, grep { -d } $d);
+        }
+    }
+    else {
+        # Skip newer version.  I.e. don't look in
+        # 5.7.0 if we're installing 5.6.1.
+    }
+}
+
+if (@inc_version_list) {
+    print join(' ', @inc_version_list);
+}
+else {
+    # Blank space to preserve value for next Configure run.
+    print " ";
+}
+EOPL
+chmod +x getverlist
+case "$inc_version_list" in
+'')     if test -x "$perl5$exe_ext"; then
+                dflt=`$perl5 getverlist`
+        else
+                dflt='none'
+        fi
+        ;;
+$undef) dflt='none' ;;
+*)  eval dflt=\"$inc_version_list\" ;;
+esac
+case "$dflt" in
+''|' ') dflt=none ;;
+esac
+case "$dflt" in
+5.005) dflt=none ;;
+esac
+$cat <<EOM
+
+In order to ease the process of upgrading, this version of perl 
+can be configured to use modules built and installed with earlier 
+versions of perl that were installed under $prefix.  Specify here
+the list of earlier versions that this version of perl should check.
+If Configure detected no earlier versions of perl installed under
+$prefix, then the list will be empty.  Answer 'none' to tell perl
+to not search earlier versions.
+
+The default should almost always be sensible, so if you're not sure,
+just accept the default.
+EOM
+
+rp='List of earlier versions to include in @INC?'
+. ./myread
+case "$ans" in
+[Nn]one|''|' ') inc_version_list=' ' ;;
+*) inc_version_list="$ans" ;;
+esac
+case "$inc_version_list" in
+''|' ') 
+        inc_version_list_init='0';;
+*)      inc_version_list_init=`echo $inc_version_list |
+                $sed -e 's/^/"/' -e 's/ /","/g' -e 's/$/",0/'`
+        ;;
+esac
+$rm -f getverlist
+
+: determine whether to install perl also as /usr/bin/perl
+
+echo " "
+if $test -d /usr/bin -a "X$installbin" != X/usr/bin; then
+        $cat <<EOM
+Many scripts expect perl to be installed as /usr/bin/perl.
+
+If you want to, I can install the perl you are about to compile
+as /usr/bin/perl (in addition to $bin/perl).
+EOM
+        if test -f /usr/bin/perl; then
+            $cat <<EOM
+
+However, please note that because you already have a /usr/bin/perl,
+overwriting that with a new Perl would very probably cause problems.
+Therefore I'm assuming you don't want to do that (unless you insist).
+
+EOM
+            case "$installusrbinperl" in
+            "$define"|[yY]*)    dflt='y';;
+            *)                  dflt='n';;
+            esac
+        else
+            $cat <<EOM
+
+Since you don't have a /usr/bin/perl I'm assuming creating one is okay.
+
+EOM
+            case "$installusrbinperl" in
+            "$undef"|[nN]*)     dflt='n';;
+            *)                  dflt='y';;
+            esac
+        fi
+        rp="Do you want to install perl as /usr/bin/perl?"
+        . ./myread
+        case "$ans" in
+        [yY]*)  val="$define";;
+        *)      val="$undef" ;;
+        esac
+else
+        val="$undef"
+fi
+set installusrbinperl
+eval $setvar
 
 echo " "
@@ -5418 +6986 @@
         case "$dflt" in
         '') 
-                if $test "$osname" = aix -a ! -f /lib/syscalls.exp; then
+                if $test "$osname" = aix -a "X$PASE" != "Xdefine" -a ! -f /lib/syscalls.exp; then
                         echo " "
                         echo "Whoops!  This is an AIX system without /lib/syscalls.exp!" >&4
@@ -5656 +7224 @@
 xrun='eval "<libc.tmp $com >libc.list"; echo "done." >&4'
 xxx='[ADTSIW]'
-if com="$sed -n -e 's/__IO//' -e 's/^.* $xxx  *_[_.]*//p' -e 's/^.* $xxx  *//p'";\
+if com="$sed -n -e 's/__IO//' -e 's/^.* $xxx  *//p'";\
         eval $xscan;\
         $contains '^fprintf$' libc.list >/dev/null 2>&1; then
@@ -5765 +7333 @@
 fi
 nm_extract="$com"
-if $test -f /lib/syscalls.exp; then
+case "$PASE" in
+define)
+    echo " "
+    echo "Since you are compiling for PASE, extracting more symbols from libc.a ...">&4
+    dump -Tv /lib/libc.a | awk '$7 == "/unix" {print $5 " " $8}' | grep "^SV" | awk '{print $2}' >> libc.list
+    ;;
+*)  if $test -f /lib/syscalls.exp; then
         echo " "
         echo "Also extracting names from /lib/syscalls.exp for good ole AIX..." >&4
         $sed -n 's/^\([^        ]*\)[   ]*syscall[0-9]*[        ]*$/\1/p' /lib/syscalls.exp >>libc.list
-fi
+    fi
+    ;;
+esac
 ;;
 esac
 $rm -f libnames libpath
+
+: see if dld is available
+set dld.h i_dld
+eval $inhdr
 
 : is a C symbol defined?
 csym='tlook=$1;
 case "$3" in
--v) tf=libc.tmp; tc=""; tdc="";;
--a) tf=libc.tmp; tc="[0]"; tdc="[]";;
-*) tlook="^$1\$"; tf=libc.list; tc="()"; tdc="()";;
+-v) tf=libc.tmp; tdc="";;
+-a) tf=libc.tmp; tdc="[]";;
+*) tlook="^$1\$"; tf=libc.list; tdc="()";;
 esac;
 tx=yes;
@@ -5788 +7368 @@
 case "$tx" in
 yes)
-        case "$runnm" in
-        true)
-                if $contains $tlook $tf >/dev/null 2>&1;
-                then tval=true;
-                else tval=false;
-                fi;;
-        *)
-                echo "int main() { extern short $1$tdc; printf(\"%hd\", $1$tc); }" > t.c;
-                if $cc -o t $optimize $ccflags $ldflags t.c $libs >/dev/null 2>&1;
-                then tval=true;
-                else tval=false;
+        tval=false;
+        if $test "$runnm" = true; then
+                if $contains $tlook $tf >/dev/null 2>&1; then
+                        tval=true;
+                elif $test "$mistrustnm" = compile -o "$mistrustnm" = run; then
+                        echo "void *(*(p()))$tdc { extern void *$1$tdc; return &$1; } int main() { if(p()) return(0); else return(1); }"> try.c;
+                        $cc -o try $optimize $ccflags $ldflags try.c >/dev/null 2>&1 $libs && tval=true;
+                        $test "$mistrustnm" = run -a -x try && { $run ./try$_exe >/dev/null 2>&1 || tval=false; };
+                        $rm -f try$_exe try.c core core.* try.core;
                 fi;
-                $rm -f t t.c;;
-        esac;;
+        else
+                echo "void *(*(p()))$tdc { extern void *$1$tdc; return &$1; } int main() { if(p()) return(0); else return(1); }"> try.c;
+                $cc -o try $optimize $ccflags $ldflags try.c $libs >/dev/null 2>&1 && tval=true;
+                $rm -f try$_exe try.c;
+        fi;
+        ;;
 *)
         case "$tval" in
         $define) tval=true;;
         *) tval=false;;
-        esac;;
+        esac;
+        ;;
 esac;
 eval "$2=$tval"'
@@ -5836 +7419 @@
         esac;;
 esac'
-
-: see if sqrtl exists
-set sqrtl d_sqrtl
-eval $inlibc
-
-: check for length of double
-echo " "
-case "$doublesize" in
-'')
-        echo "Checking to see how big your double precision numbers are..." >&4
-        $cat >try.c <<'EOCP'
-#include <stdio.h>
-int main()
-{
-    printf("%d\n", (int)sizeof(double));
-    exit(0);
-}
-EOCP
-        set try
-        if eval $compile_ok; then
-                doublesize=`$run ./try`
-                echo "Your double is $doublesize bytes long."
-        else
-                dflt='8'
-                echo "(I can't seem to compile the test program.  Guessing...)"
-                rp="What is the size of a double precision number (in bytes)?"
-                . ./myread
-                doublesize="$ans"
-        fi
-        ;;
-esac
-$rm -f try.c try
-
-: check for long doubles
-echo " "
-echo "Checking to see if you have long double..." >&4
-echo 'int main() { long double x = 7.0; }' > try.c
-set try
-if eval $compile; then
-        val="$define"
-        echo "You have long double."
-else
-        val="$undef"
-        echo "You do not have long double."
-fi
-$rm try.*
-set d_longdbl
-eval $setvar
-
-: check for length of long double
-case "${d_longdbl}${longdblsize}" in
-$define)
-        echo " "
-        echo "Checking to see how big your long doubles are..." >&4
-        $cat >try.c <<'EOCP'
-#include <stdio.h>
-int main()
-{
-        printf("%d\n", sizeof(long double));
-}
-EOCP
-        set try
-        set try
-        if eval $compile; then
-                longdblsize=`$run ./try`
-                echo "Your long doubles are $longdblsize bytes long."
-        else
-                dflt='8'
-                echo " "
-                echo "(I can't seem to compile the test program.  Guessing...)" >&4
-                rp="What is the size of a long double (in bytes)?"
-                . ./myread
-                longdblsize="$ans"
-        fi
-        if $test "X$doublesize" = "X$longdblsize"; then
-                echo "(That isn't any different from an ordinary double.)"
-        fi      
-        ;;
-esac
-$rm -f try.* try
-
-echo " "
-
-if $test X"$d_longdbl" = X"$define"; then
-
-echo "Checking how to print long doubles..." >&4
-
-if $test X"$sPRIfldbl" = X -a X"$doublesize" = X"$longdblsize"; then
-        $cat >try.c <<'EOCP'
-#include <sys/types.h>
-#include <stdio.h>
-int main() {
-  double d = 123.456;
-  printf("%.3f\n", d);
-}
-EOCP
-        set try
-        if eval $compile; then
-                yyy=`$run ./try`
-                case "$yyy" in
-                123.456)
-                        sPRIfldbl='"f"'; sPRIgldbl='"g"'; sPRIeldbl='"e"';
-                        sPRIFUldbl='"F"'; sPRIGUldbl='"G"'; sPRIEUldbl='"E"';
-                        echo "We will use %f."
-                        ;;
-                esac
-        fi
-fi
-
-if $test X"$sPRIfldbl" = X; then
-        $cat >try.c <<'EOCP'
-#include <sys/types.h>
-#include <stdio.h>
-int main() {
-  long double d = 123.456;
-  printf("%.3Lf\n", d);
-}
-EOCP
-        set try
-        if eval $compile; then
-                yyy=`$run ./try`
-                case "$yyy" in
-                123.456)
-                        sPRIfldbl='"Lf"'; sPRIgldbl='"Lg"'; sPRIeldbl='"Le"';
-                        sPRIFUldbl='"LF"'; sPRIGUldbl='"LG"'; sPRIEUldbl='"LE"';
-                        echo "We will use %Lf."
-                        ;;
-                esac
-        fi
-fi
-
-if $test X"$sPRIfldbl" = X; then
-        $cat >try.c <<'EOCP'
-#include <sys/types.h>
-#include <stdio.h>
-int main() {
-  long double d = 123.456;
-  printf("%.3llf\n", d);
-}
-EOCP
-        set try
-        if eval $compile; then
-                yyy=`$run ./try`
-                case "$yyy" in
-                123.456)
-                        sPRIfldbl='"llf"'; sPRIgldbl='"llg"'; sPRIeldbl='"lle"';
-                        sPRIFUldbl='"llF"'; sPRIGUldbl='"llG"'; sPRIEUldbl='"llE"';
-                        echo "We will use %llf."
-                        ;;
-                esac
-        fi
-fi
-
-if $test X"$sPRIfldbl" = X; then
-        $cat >try.c <<'EOCP'
-#include <sys/types.h>
-#include <stdio.h>
-int main() {
-  long double d = 123.456;
-  printf("%.3lf\n", d);
-}
-EOCP
-        set try
-        if eval $compile; then
-                yyy=`$run ./try`
-                case "$yyy" in
-                123.456)
-                        sPRIfldbl='"lf"'; sPRIgldbl='"lg"'; sPRIeldbl='"le"';
-                        sPRIFUldbl='"lF"'; sPRIGUldbl='"lG"'; sPRIEUldbl='"lE"';
-                        echo "We will use %lf."
-                        ;;
-                esac
-        fi
-fi
-
-if $test X"$sPRIfldbl" = X; then
-        echo "Cannot figure out how to print long doubles." >&4
-else
-        sSCNfldbl=$sPRIfldbl    # expect consistency
-fi
-
-$rm -f try try.*
-
-fi # d_longdbl
-
-case "$sPRIfldbl" in
-'')     d_PRIfldbl="$undef"; d_PRIgldbl="$undef"; d_PRIeldbl="$undef"; 
-        d_PRIFUldbl="$undef"; d_PRIGUldbl="$undef"; d_PRIEUldbl="$undef"; 
-        d_SCNfldbl="$undef";
-        ;;
-*)      d_PRIfldbl="$define"; d_PRIgldbl="$define"; d_PRIeldbl="$define"; 
-        d_PRIFUldbl="$define"; d_PRIGUldbl="$define"; d_PRIEUldbl="$define"; 
-        d_SCNfldbl="$define";
-        ;;
-esac
-
-: see if modfl exists
-set modfl d_modfl
-eval $inlibc
-
-d_modfl_pow32_bug="$undef"
-
-case "$d_longdbl$d_modfl" in
-$define$define)
-        $cat <<EOM
-Checking to see whether your modfl() is okay for large values...
-EOM
-$cat >try.c <<EOCP
-#include <math.h> 
-#include <stdio.h>
-int main() {
-    long double nv = 4294967303.15;
-    long double v, w;
-    v = modfl(nv, &w);         
-#ifdef __GLIBC__
-    printf("glibc");
-#endif
-    printf(" %"$sPRIfldbl" %"$sPRIfldbl" %"$sPRIfldbl"\n", nv, v, w);
-    return 0;
-}
-EOCP
-        case "$osname:$gccversion" in
-        aix:)   saveccflags="$ccflags"
-                ccflags="$ccflags -qlongdouble" ;; # to avoid core dump
-        esac
-        set try
-        if eval $compile; then
-                foo=`$run ./try`
-                case "$foo" in
-                *" 4294967303.150000 1.150000 4294967302.000000")
-                        echo >&4 "Your modfl() is broken for large values."
-                        d_modfl_pow32_bug="$define"
-                        case "$foo" in
-                        glibc)  echo >&4 "You should upgrade your glibc to at least 2.2.2 to get a fixed modfl()."
-                        ;;
-                        esac
-                        ;;
-                *" 4294967303.150000 0.150000 4294967303.000000")
-                        echo >&4 "Your modfl() seems okay for large values."
-                        ;;
-                *)      echo >&4 "I don't understand your modfl() at all."
-                        d_modfl="$undef"
-                        ;;
-                esac
-                $rm -f try.* try core core.try.*
-        else
-                echo "I cannot figure out whether your modfl() is okay, assuming it isn't."
-                d_modfl="$undef"
-        fi
-        case "$osname:$gccversion" in
-        aix:)   ccflags="$saveccflags" ;; # restore
-        esac
-        ;;
-esac
-
-case "$ccflags" in
-*-DUSE_LONG_DOUBLE*|*-DUSE_MORE_BITS*) uselongdouble="$define" ;;
-esac
-
-case "$uselongdouble" in
-$define|true|[yY]*)     dflt='y';;
-*) dflt='n';;
-esac
-cat <<EOM
-
-Perl can be built to take advantage of long doubles which
-(if available) may give more accuracy and range for floating point numbers.
-
-If this doesn't make any sense to you, just accept the default '$dflt'.
-EOM
-rp='Try to use long doubles if available?'
-. ./myread
-case "$ans" in
-y|Y)    val="$define"   ;;
-*)      val="$undef"    ;;
-esac
-set uselongdouble
-eval $setvar
-
-case "$uselongdouble" in
-true|[yY]*) uselongdouble="$define" ;;
-esac
-
-case "$uselongdouble" in
-$define)
-: Look for a hint-file generated 'call-back-unit'.  If the
-: user has specified that long doubles should be used,
-: we may need to set or change some other defaults.
-        if $test -f uselongdouble.cbu; then
-                echo "Your platform has some specific hints for long doubles, using them..."
-                . ./uselongdouble.cbu
-        else
-                $cat <<EOM
-(Your platform doesn't have any specific hints for long doubles.)
-EOM
-        fi
-        ;;
-esac
-
-message=X
-case "$uselongdouble:$d_sqrtl:$d_modfl" in
-$define:$define:$define)
-        : You have both
-        ;;
-$define:$define:$undef)
-        message="I could not find modfl"
-        ;;
-$define:$undef:$define)
-        message="I could not find sqrtl"
-        ;;
-$define:$undef:$undef)
-        message="I found neither sqrtl nor modfl"
-        ;;
-esac
-
-if $test "$message" != X; then
-        $cat <<EOM >&4
-
-*** You requested the use of long doubles but you do not seem to have
-*** the mathematic functions for long doubles.
-*** ($message)
-*** I'm disabling the use of long doubles.
-
-EOM
-
-        uselongdouble=$undef
-fi
-
-: determine the architecture name
-echo " "
-if xxx=`./loc arch blurfl $pth`; $test -f "$xxx"; then
-        tarch=`arch`"-$osname"
-elif xxx=`./loc uname blurfl $pth`; $test -f "$xxx" ; then
-        if uname -m > tmparch 2>&1 ; then
-                tarch=`$sed -e 's/ *$//' -e 's/ /_/g' \
-                        -e 's/$/'"-$osname/" tmparch`
-        else
-                tarch="$osname"
-        fi
-        $rm -f tmparch
-else
-        tarch="$osname"
-fi
-case "$myarchname" in
-''|"$tarch") ;;
-*)
-        echo "(Your architecture name used to be $myarchname.)"
-        archname=''
-        ;;
-esac
-case "$targetarch" in
-'') ;;
-*)  archname=`echo $targetarch|sed 's,^[^-]*-,,'` ;;
-esac
-myarchname="$tarch"
-case "$archname" in
-'') dflt="$tarch";;
-*) dflt="$archname";;
-esac
-rp='What is your architecture name'
-. ./myread
-archname="$ans"
-case "$usethreads" in
-$define)
-        echo "Threads selected." >&4
-        case "$archname" in
-        *-thread*) echo "...and architecture name already has -thread." >&4
-                ;;
-        *)      archname="$archname-thread"
-                echo "...setting architecture name to $archname." >&4
-                ;;
-        esac
-        ;;
-esac
-case "$usemultiplicity" in
-$define)
-        echo "Multiplicity selected." >&4
-        case "$archname" in
-        *-multi*) echo "...and architecture name already has -multi." >&4
-                ;;
-        *)      archname="$archname-multi"
-                echo "...setting architecture name to $archname." >&4
-                ;;
-        esac
-        ;;
-esac
-case "$use64bitint$use64bitall" in
-*"$define"*)
-        case "$archname64" in
-        '')
-                echo "This architecture is naturally 64-bit, not changing architecture name." >&4
-                ;;
-        *)
-                case "$use64bitint" in
-                "$define") echo "64 bit integers selected." >&4 ;;
-                esac
-                case "$use64bitall" in
-                "$define") echo "Maximal 64 bitness selected." >&4 ;;
-                esac
-                case "$archname" in
-                *-$archname64*) echo "...and architecture name already has $archname64." >&4
-                        ;;
-                *)      archname="$archname-$archname64"
-                        echo "...setting architecture name to $archname." >&4
-                        ;;
-                esac
-                ;;
-        esac
-esac
-case "$uselongdouble" in
-$define)
-        echo "Long doubles selected." >&4
-        case "$longdblsize" in
-        $doublesize)
-                echo "...but long doubles are equal to doubles, not changing architecture name." >&4
-                ;;
-        *)
-                case "$archname" in
-                *-ld*) echo "...and architecture name already has -ld." >&4
-                        ;;
-                *)      archname="$archname-ld"
-                        echo "...setting architecture name to $archname." >&4
-                        ;;
-                esac
-                ;;
-        esac
-        ;;
-esac
-case "$useperlio" in
-$define)
-        echo "Perlio selected." >&4
-        ;;
-*)
-        echo "Perlio not selected, using stdio." >&4
-        case "$archname" in
-        *-stdio*) echo "...and architecture name already has -stdio." >&4
-                ;;
-        *)      archname="$archname-stdio"
-                echo "...setting architecture name to $archname." >&4
-                ;;
-        esac
-        ;;
-esac
-
-: determine root of directory hierarchy where package will be installed.
-case "$prefix" in
-'')
-        dflt=`./loc . /usr/local /usr/local /local /opt /usr`
-        ;;
-*)
-        dflt="$prefix"
-        ;;
-esac
-$cat <<EOM
-
-By default, $package will be installed in $dflt/bin, manual pages
-under $dflt/man, etc..., i.e. with $dflt as prefix for all
-installation directories. Typically this is something like /usr/local.
-If you wish to have binaries under /usr/bin but other parts of the
-installation under /usr/local, that's ok: you will be prompted
-separately for each of the installation directories, the prefix being
-only used to set the defaults.
-
-EOM
-fn=d~
-rp='Installation prefix to use?'
-. ./getfile
-oldprefix=''
-case "$prefix" in
-'') ;;
-*)
-        case "$ans" in
-        "$prefix") ;;
-        *) oldprefix="$prefix";;
-        esac
-        ;;
-esac
-prefix="$ans"
-prefixexp="$ansexp"
-
-case "$afsroot" in
-'')     afsroot=/afs ;;
-*)      afsroot=$afsroot ;;
-esac
-
-: is AFS running?
-echo " "
-case "$afs" in
-$define|true)   afs=true ;;
-$undef|false)   afs=false ;;
-*)      if test -d $afsroot; then
-                afs=true
-        else
-                afs=false
-        fi
-        ;;
-esac
-if $afs; then
-        echo "AFS may be running... I'll be extra cautious then..." >&4
-else
-        echo "AFS does not seem to be running..." >&4
-fi
-
-: determine installation prefix for where package is to be installed.
-if $afs; then 
-$cat <<EOM
-
-Since you are running AFS, I need to distinguish the directory in which
-files will reside from the directory in which they are installed (and from
-which they are presumably copied to the former directory by occult means).
-
-EOM
-        case "$installprefix" in
-        '') dflt=`echo $prefix | sed 's#^/afs/#/afs/.#'`;;
-        *) dflt="$installprefix";;
-        esac
-else
-$cat <<EOM
-
-In some special cases, particularly when building $package for distribution,
-it is convenient to distinguish between the directory in which files should 
-be installed from the directory ($prefix) in which they 
-will eventually reside.  For most users, these two directories are the same.
-
-EOM
-        case "$installprefix" in
-        '') dflt=$prefix ;;
-        *) dflt=$installprefix;;
-        esac
-fi
-fn=d~
-rp='What installation prefix should I use for installing files?'
-. ./getfile
-installprefix="$ans"
-installprefixexp="$ansexp"
-
-: set the prefixit variable, to compute a suitable default value
-prefixit='case "$3" in
-""|none)
-        case "$oldprefix" in
-        "") eval "$1=\"\$$2\"";;
-        *)
-                case "$3" in
-                "") eval "$1=";;
-                none)
-                        eval "tp=\"\$$2\"";
-                        case "$tp" in
-                        ""|" ") eval "$1=\"\$$2\"";;
-                        *) eval "$1=";;
-                        esac;;
-                esac;;
-        esac;;
-*)
-        eval "tp=\"$oldprefix-\$$2-\""; eval "tp=\"$tp\"";
-        case "$tp" in
-        --|/*--|\~*--) eval "$1=\"$prefix/$3\"";;
-        /*-$oldprefix/*|\~*-$oldprefix/*)
-                eval "$1=\`echo \$$2 | sed \"s,^$oldprefix,$prefix,\"\`";;
-        *) eval "$1=\"\$$2\"";;
-        esac;;
-esac'
-
-: get the patchlevel
-echo " "
-echo "Getting the current patchlevel..." >&4
-if $test -r $rsrc/patchlevel.h;then
-        revision=`awk '/define[         ]+PERL_REVISION/ {print $3}' $rsrc/patchlevel.h`
-        patchlevel=`awk '/define[       ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
-        subversion=`awk '/define[       ]+PERL_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
-        api_revision=`awk '/define[     ]+PERL_API_REVISION/ {print $3}' $rsrc/patchlevel.h`
-        api_version=`awk '/define[      ]+PERL_API_VERSION/ {print $3}' $rsrc/patchlevel.h`
-        api_subversion=`awk '/define[   ]+PERL_API_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
-       perl_patchlevel=`grep ',"DEVEL[0-9][0-9]*"' $rsrc/patchlevel.h|sed 's/[^0-9]//g'`
-else
-        revision=0
-        patchlevel=0
-        subversion=0
-        api_revision=0
-        api_version=0
-        api_subversion=0
-        perl_patchlevel=0
-        $echo "(You do not have patchlevel.h.  Eek.)"
-fi
-if $test -r $rsrc/.patch ; then  
-        if $test "`cat $rsrc/.patch`" -gt "$perl_patchlevel" ; then
-                perl_patchlevel=`cat $rsrc/.patch`
-        fi
-fi
-: Define a handy string here to avoid duplication in myconfig.SH and configpm.
-version_patchlevel_string="version $patchlevel subversion $subversion"
-case "$perl_patchlevel" in
-0|'') ;;
-*) version_patchlevel_string="$version_patchlevel_string patch $perl_patchlevel" ;;
-esac
-
-$echo "(You have $package $version_patchlevel_string.)"
-
-case "$osname" in
-dos|vms)
-        : XXX Should be a Configure test for double-dots in filenames.
-        version=`echo $revision $patchlevel $subversion | \
-                 $awk '{ printf "%d_%d_%d\n", $1, $2, $3 }'`
-        api_versionstring=`echo $api_revision $api_version $api_subversion | \
-                 $awk '{ printf "%d_%d_%d\n", $1, $2, $3 }'`
-        ;;
-*)
-        version=`echo $revision $patchlevel $subversion | \
-                 $awk '{ printf "%d.%d.%d\n", $1, $2, $3 }'`
-        api_versionstring=`echo $api_revision $api_version $api_subversion | \
-                 $awk '{ printf "%d.%d.%d\n", $1, $2, $3 }'`
-        ;;
-esac
-: Special case the 5.005_xx maintenance series, which used 5.005
-: without any subversion label as a subdirectory in $sitelib
-if test "${api_revision}${api_version}${api_subversion}" = "550"; then
-        api_versionstring='5.005'
-fi
-
-: determine installation style
-: For now, try to deduce it from prefix unless it is already set.
-: Reproduce behavior of 5.005 and earlier, maybe drop that in 5.7.
-case "$installstyle" in
-'')     case "$prefix" in
-                *perl*) dflt='lib';;
-                *) dflt='lib/perl5' ;;
-        esac
-        ;;
-*)      dflt="$installstyle" ;;
-esac
-: Probably not worth prompting for this since we prompt for all
-: the directories individually, and the prompt would be too long and
-: confusing anyway.
-installstyle=$dflt
-
-: determine where private library files go
-: Usual default is /usr/local/lib/perl5/$version.
-: Also allow things like /opt/perl/lib/$version, since 
-: /opt/perl/lib/perl5... would be redundant.
-: The default "style" setting is made in installstyle.U
-case "$installstyle" in
-*lib/perl5*) set dflt privlib lib/$package/$version ;;
-*)       set dflt privlib lib/$version ;;
-esac
-eval $prefixit
-$cat <<EOM
-
-There are some auxiliary files for $package that need to be put into a
-private library directory that is accessible by everyone.
-
-EOM
-fn=d~+
-rp='Pathname where the private library files will reside?'
-. ./getfile
-privlib="$ans"
-privlibexp="$ansexp"
-: Change installation prefix, if necessary.
-if $test X"$prefix" != X"$installprefix"; then
-        installprivlib=`echo $privlibexp | sed "s#^$prefix#$installprefix#"`
-else
-        installprivlib="$privlibexp"
-fi
-
-: set the prefixup variable, to restore leading tilda escape
-prefixup='case "$prefixexp" in
-"$prefix") ;;
-*) eval "$1=\`echo \$$1 | sed \"s,^$prefixexp,$prefix,\"\`";;
-esac'
-
-: determine where public architecture dependent libraries go
-set archlib archlib
-eval $prefixit
-: privlib default is /usr/local/lib/$package/$version
-: archlib default is /usr/local/lib/$package/$version/$archname
-: privlib may have an optional trailing /share.
-tdflt=`echo $privlib | $sed 's,/share$,,'`
-tdflt=$tdflt/$archname
-case "$archlib" in
-'')     dflt=$tdflt
-        ;;
-*)      dflt="$archlib"
-    ;;
-esac
-$cat <<EOM
-
-$spackage contains architecture-dependent library files.  If you are
-sharing libraries in a heterogeneous environment, you might store
-these files in a separate location.  Otherwise, you can just include
-them with the rest of the public library files.
-
-EOM
-fn=d+~
-rp='Where do you want to put the public architecture-dependent libraries?'
-. ./getfile
-archlib="$ans"
-archlibexp="$ansexp"
-if $test X"$archlib" = X"$privlib"; then
-        d_archlib="$undef"
-else
-        d_archlib="$define"
-fi
-: Change installation prefix, if necessary.
-if $test X"$prefix" != X"$installprefix"; then
-        installarchlib=`echo $archlibexp | sed "s#^$prefix#$installprefix#"`
-else
-        installarchlib="$archlibexp"
-fi
-
-: see if setuid scripts can be secure
-$cat <<EOM
-
-Some kernels have a bug that prevents setuid #! scripts from being
-secure.  Some sites have disabled setuid #! scripts because of this.
-
-First let's decide if your kernel supports secure setuid #! scripts.
-(If setuid #! scripts would be secure but have been disabled anyway,
-don't say that they are secure if asked.)
-
-EOM
-
-val="$undef"
-if $test -d /dev/fd; then
-        echo "#!$ls" >reflect
-        chmod +x,u+s reflect
-        ./reflect >flect 2>&1
-        if $contains "/dev/fd" flect >/dev/null; then
-                echo "Congratulations, your kernel has secure setuid scripts!" >&4
-                val="$define"
-        else
-                $cat <<EOM
-If you are not sure if they are secure, I can check but I'll need a
-username and password different from the one you are using right now.
-If you don't have such a username or don't want me to test, simply
-enter 'none'.
-
-EOM
-                rp='Other username to test security of setuid scripts with?'
-                dflt='none'
-                . ./myread
-                case "$ans" in
-                n|none)
-                        case "$d_suidsafe" in
-                        '')     echo "I'll assume setuid scripts are *not* secure." >&4
-                                dflt=n;;
-                        "$undef")
-                                echo "Well, the $hint value is *not* secure." >&4
-                                dflt=n;;
-                        *)      echo "Well, the $hint value *is* secure." >&4
-                                dflt=y;;
-                        esac
-                        ;;
-                *)
-                        $rm -f reflect flect
-                        echo "#!$ls" >reflect
-                        chmod +x,u+s reflect
-                        echo >flect
-                        chmod a+w flect
-                        echo '"su" will (probably) prompt you for '"$ans's password."
-                        su $ans -c './reflect >flect'
-                        if $contains "/dev/fd" flect >/dev/null; then
-                                echo "Okay, it looks like setuid scripts are secure." >&4
-                                dflt=y
-                        else
-                                echo "I don't think setuid scripts are secure." >&4
-                                dflt=n
-                        fi
-                        ;;
-                esac
-                rp='Does your kernel have *secure* setuid scripts?'
-                . ./myread
-                case "$ans" in
-                [yY]*)  val="$define";;
-                *)      val="$undef";;
-                esac
-        fi
-else
-        echo "I don't think setuid scripts are secure (no /dev/fd directory)." >&4
-        echo "(That's for file descriptors, not floppy disks.)"
-        val="$undef"
-fi
-set d_suidsafe
-eval $setvar
-
-$rm -f reflect flect
-
-: now see if they want to do setuid emulation
-echo " "
-val="$undef"
-case "$d_suidsafe" in
-"$define")
-        val="$undef"
-        echo "No need to emulate SUID scripts since they are secure here." >&4
-        ;;
-*)
-        $cat <<EOM
-Some systems have disabled setuid scripts, especially systems where
-setuid scripts cannot be secure.  On systems where setuid scripts have
-been disabled, the setuid/setgid bits on scripts are currently
-useless.  It is possible for $package to detect those bits and emulate
-setuid/setgid in a secure fashion.  This emulation will only work if
-setuid scripts have been disabled in your kernel.
-
-EOM
-        case "$d_dosuid" in
-        "$define") dflt=y ;;
-        *) dflt=n ;;
-        esac
-        rp="Do you want to do setuid/setgid emulation?"
-        . ./myread
-        case "$ans" in
-        [yY]*)  val="$define";;
-        *)      val="$undef";;
-        esac
-        ;;
-esac
-set d_dosuid
-eval $setvar
-
-: see if this is a malloc.h system
-set malloc.h i_malloc
-eval $inhdr
-
-: see if stdlib is available
-set stdlib.h i_stdlib
-eval $inhdr
-
-: check for void type
-echo " "
-echo "Checking to see how well your C compiler groks the void type..." >&4
-case "$voidflags" in
-'')
-        $cat >try.c <<'EOCP'
-#if TRY & 1
-void sub() {
-#else
-sub() {
-#endif
-        extern void moo();      /* function returning void */
-        void (*goo)();          /* ptr to func returning void */
-#if TRY & 8
-        void *hue;              /* generic ptr */
-#endif
-#if TRY & 2
-        void (*foo[10])();
-#endif
-
-#if TRY & 4
-        if(goo == moo) {
-                exit(0);
-        }
-#endif
-        exit(0);
-}
-int main() { sub(); }
-EOCP
-        if $cc $ccflags -c -DTRY=$defvoidused try.c >.out 2>&1 ; then
-                voidflags=$defvoidused
-        echo "Good.  It appears to support void to the level $package wants.">&4
-                if $contains warning .out >/dev/null 2>&1; then
-                        echo "However, you might get some warnings that look like this:"
-                        $cat .out
-                fi
-        else
-echo "Hmm, your compiler has some difficulty with void. Checking further..." >&4
-                if $cc $ccflags -c -DTRY=1 try.c >/dev/null 2>&1; then
-                        echo "It supports 1..."
-                        if $cc $ccflags -c -DTRY=3 try.c >/dev/null 2>&1; then
-                                echo "It also supports 2..."
-                                if $cc $ccflags -c -DTRY=7 try.c >/dev/null 2>&1; then
-                                        voidflags=7
-                                        echo "And it supports 4 but not 8 definitely."
-                                else
-                                        echo "It doesn't support 4..."
-                                        if $cc $ccflags -c -DTRY=11 try.c >/dev/null 2>&1; then
-                                                voidflags=11
-                                                echo "But it supports 8."
-                                        else
-                                                voidflags=3
-                                                echo "Neither does it support 8."
-                                        fi
-                                fi
-                        else
-                                echo "It does not support 2..."
-                                if $cc $ccflags -c -DTRY=13 try.c >/dev/null 2>&1; then
-                                        voidflags=13
-                                        echo "But it supports 4 and 8."
-                                else
-                                        if $cc $ccflags -c -DTRY=5 try.c >/dev/null 2>&1; then
-                                                voidflags=5
-                                                echo "And it supports 4 but has not heard about 8."
-                                        else
-                                                echo "However it supports 8 but not 4."
-                                        fi
-                                fi
-                        fi
-                else
-                        echo "There is no support at all for void."
-                        voidflags=0
-                fi
-        fi
-esac
-case "$voidflags" in
-"$defvoidused") ;;
-*)      $cat >&4 <<'EOM'
-  Support flag bits are:
-    1: basic void declarations.
-    2: arrays of pointers to functions returning void.
-    4: operations between pointers to and addresses of void functions.
-    8: generic void pointers.
-EOM
-        dflt="$voidflags";
-        rp="Your void support flags add up to what?"
-        . ./myread
-        voidflags="$ans"
-        ;;
-esac
-$rm -f try.* .out
-
-: check for length of pointer
-echo " "
-case "$ptrsize" in
-'')
-        echo "Checking to see how big your pointers are..." >&4
-        if test "$voidflags" -gt 7; then
-                echo '#define VOID_PTR char *' > try.c
-        else
-                echo '#define VOID_PTR void *' > try.c
-        fi
-        $cat >>try.c <<'EOCP'
-#include <stdio.h>
-int main()
-{
-    printf("%d\n", (int)sizeof(VOID_PTR));
-    exit(0);
-}
-EOCP
-        set try
-        if eval $compile_ok; then
-                ptrsize=`$run ./try`
-                echo "Your pointers are $ptrsize bytes long."
-        else
-                dflt='4'
-                echo "(I can't seem to compile the test program.  Guessing...)" >&4
-                rp="What is the size of a pointer (in bytes)?"
-                . ./myread
-                ptrsize="$ans"
-        fi
-        ;;
-esac
-$rm -f try.c try
-case "$use64bitall" in
-"$define"|true|[yY]*)
-        case "$ptrsize" in
-        4)      cat <<EOM >&4
-
-*** You have chosen a maximally 64-bit build, but your pointers
-*** are only 4 bytes wide, disabling maximal 64-bitness.
-
-EOM
-                use64bitall="$undef"
-                case "$use64bitint" in
-                "$define"|true|[yY]*) ;;
-                *)      cat <<EOM >&4
-
-*** Downgrading from maximal 64-bitness to using 64-bit integers.
-
-EOM
-                        use64bitint="$define"
-                        ;;
-                esac
-                ;;
-        esac
-        ;;
-esac
-
-
-: determine which malloc to compile in
-echo " "
-case "$usemymalloc" in
-[yY]*|true|$define)     dflt='y' ;;
-[nN]*|false|$undef)     dflt='n' ;;
-*)      case "$ptrsize" in
-        4) dflt='y' ;;
-        *) dflt='n' ;;
-        esac
-        ;;
-esac
-rp="Do you wish to attempt to use the malloc that comes with $package?"
-. ./myread
-usemymalloc="$ans"
-case "$ans" in
-y*|true)
-        usemymalloc='y'
-        mallocsrc='malloc.c'
-        mallocobj="malloc$_o"
-        d_mymalloc="$define"
-        case "$libs" in
-        *-lmalloc*)
-                : Remove malloc from list of libraries to use
-                echo "Removing unneeded -lmalloc from library list" >&4
-                set `echo X $libs | $sed -e 's/-lmalloc / /' -e 's/-lmalloc$//'`
-                shift
-                libs="$*"
-                echo "libs = $libs" >&4
-                ;;
-        esac
-        ;;
-*)
-        usemymalloc='n'
-        mallocsrc=''
-        mallocobj=''
-        d_mymalloc="$undef"
-        ;;
-esac
-
-: compute the return types of malloc and free
-echo " "
-$cat >malloc.c <<END
-#$i_malloc I_MALLOC
-#$i_stdlib I_STDLIB