avoid infinite recursive exec()s of perl.exe when shebang

[p5sagit/p5-mst-13.2.git] / Configure

diff --git a/Configure b/Configure
index a63fbf6..c23d512 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -20,7 +20,7 @@
 
 # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
 #
-# Generated on Mon Sep 20 12:12:09 EET DST 1999 [metaconfig 3.0 PL70]
+# Generated on Mon Sep 20 12:57:28 EET DST 1999 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.com)
 
 cat >/tmp/c1$$ <<EOF
@@ -3027,12 +3027,36 @@ case "$usemorebits" in
        ;;
 esac
 
+
+cat <<EOM
+
+Perl can be built to understand large files (files larger than 2 gigabytes)
+on some systems.  To do so, Configure must be run with -Duselfs.
+
+If this doesn't make any sense to you, just accept the default.
+EOM
+case "$uselfs" in
+"$define"|true|[yY]*) dflt='y' ;;
+*)     dflt='n' ;;
+esac
+rp='Try to understand large files?'
+. ./myread
+case "$ans" in
+y|Y)   val="$define" ;;
+*)     val="$undef"  ;;
+esac
+set uselfs
+eval $setvar
+case "$uselfs" in
+"$define") use64bits="$define" ;;
+esac
+
 cat <<EOM
 
 Perl can be built to take advantage of explicit 64-bit interfaces,
 on some systems.  To do so, Configure must be run with -Duse64bits.
 
-If this doesn't make any sense to you, just accept the default 'n'.
+If this doesn't make any sense to you, just accept the default.
 EOM
 case "$use64bits" in
 $define|true|[yY]*)    dflt='y';;
@@ -4274,7 +4298,7 @@ default|recommended)
        case "$gccversion" in
        1*) ;;
        2.[0-8]*) ;;
-       *)      echo " "
+       ?*)     echo " "
                echo "Checking if your compiler accepts -fno-strict-aliasing" 2>&1
                echo 'int main(void) { return 0; }' > gcctest.c
                if $cc -O2 -fno-strict-aliasing -o gcctest gcctest.c; then
@@ -6516,16 +6540,6 @@ else
        installsitearch="$sitearchexp"
 fi
 
-
-case "$uselfs" in
-"$define"|true|[yY]*)
-       uselfs="$define"
-       use64bits="$define"
-       ;;
-*)     uselfs="$undef"
-       ;;
-esac
-
 cat <<EOM
 
 Perl can be built to take advantage of long doubles which