This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrate changes from dist-4
authorH.Merijn Brand <h.m.brand@xs4all.nl>
Wed, 9 Jan 2008 17:44:24 +0000 (17:44 +0000)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Wed, 9 Jan 2008 17:44:24 +0000 (17:44 +0000)
p4raw-id: //depot/metaconfig@32924

U/modified/Options.U

index 4f7be32..5ef4c38 100644 (file)
@@ -1,12 +1,12 @@
-?RCS: $Id: Options.U,v 3.0.1.7 1997/02/28 15:08:15 ram Exp $
+?RCS: $Id: Options.U 1 2006-08-24 12:32:52Z rmanfredi $
+?RCS:
+?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
 ?RCS:
-?RCS: Copyright (c) 1991-1993, Raphael Manfredi
-?RCS: 
 ?RCS: You may redistribute only under the terms of the Artistic Licence,
 ?RCS: as specified in the README file that comes with the distribution.
 ?RCS: You may reuse parts of this distribution only within the terms of
 ?RCS: that same Artistic Licence; a copy of which may be found at the root
-?RCS: of the source tree for dist 3.0.
+?RCS: of the source tree for dist 4.0.
 ?RCS:
 ?RCS: $Log: Options.U,v $
 ?RCS: Revision 3.0.1.7  1997/02/28  15:08:15  ram
@@ -50,7 +50,7 @@
 ?T:arg argn symbol config_arg0 config_args config_argc xxx yyy zzz uuu
 ?T:args_exp args_sep arg_exp libswanted ccflags
 ?F:./optdef.sh ./cmdline.opt ./posthint.sh ./cmdl.opt
-
+?F:!Configure
 : Save command line options in file UU/cmdline.opt for later use in
 : generating config.sh.
 ?X: This temporary file will be read by Oldsym.U.  I used a temporary
@@ -64,7 +64,7 @@
 ?X: I don't imagine anyone actually having to do that, I'm not going
 ?X: to worry too much.
 cat > cmdline.opt <<EOSH
-# Configure command line arguments.
+: Configure command line arguments.
 config_arg0='$0'
 config_args='$*'
 config_argc=$#
@@ -76,7 +76,7 @@ for arg in "$@"; do
        cat >>cmdline.opt <<EOSH
 config_arg$argn='$arg'
 EOSH
-       # Extreme backslashitis: replace each ' by '"'"'
+?X: Extreme backslashitis: replace each ' by '"'"'
        cat <<EOC | sed -e "s/'/'"'"'"'"'"'"'/g" > cmdl.opt
 $arg
 EOC
@@ -85,8 +85,8 @@ EOC
        argn=`expr $argn + 1`
        args_sep=' '
 done
-# args_exp is good for restarting self: eval "set X $args_exp"; shift; $0 "$@"
-# used by ./hints/os2.sh
+?X: args_exp is good for restarting self: eval "set X $args_exp"; shift; $0 "$@"
+?X: used by hints/os2.sh in Perl, for instance
 rm -f cmdl.opt
 
 : produce awk script to parse command line options
@@ -237,7 +237,7 @@ while test $# -gt 0; do
                  case "$zzz" in
                  *:*) zzz='' ;;
                  *)   xxx=append
-                      zzz=" "`echo "$yyy"|sed 's!^[^=]*=!!'` 
+                      zzz=" "`echo "$yyy"|sed 's!^[^=]*=!!'`
                       yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
                  esac
                  ;;
@@ -251,7 +251,7 @@ while test $# -gt 0; do
                  *)   xxx=`echo "$yyy"|sed 's!:.*!!'`
                       yyy=`echo "$yyy"|sed 's!^[^:]*:!!'` ;;
                  esac
-                 ;;       
+                 ;;
             esac
            case "$xxx" in
            append)
@@ -370,5 +370,6 @@ esac
 touch optdef.sh
 . ./optdef.sh
 : create the posthint manipulation script and leave the file out there...
+?X: this file will be perused by Oldconfig.U
 touch posthint.sh