Change 33321 by [EMAIL PROTECTED] on 2008/02/15 16:41:12

        Resync with metaconfig. Escape the last ~.

Affected files ...

... //depot/perl/Configure#684 edit
... //depot/perl/Porting/Glossary#187 edit
... //depot/perl/config_h.SH#342 edit

Differences ...

==== //depot/perl/Configure#684 (xtext) ====
Index: perl/Configure
--- perl/Configure#683~33318~   2008-02-15 06:27:55.000000000 -0800
+++ perl/Configure      2008-02-15 08:41:12.000000000 -0800
@@ -25,7 +25,7 @@
 
 # $Id: Head.U 6 2006-08-25 22:21:46Z rmanfredi $
 #
-# Generated on Tue Jan 22 17:46:32 CET 2008 [metaconfig 3.0 PL70]
+# Generated on Fri Feb 15 17:37:37 CET 2008 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by [EMAIL PROTECTED])
 
 cat >c1$$ <<EOF
@@ -1057,8 +1057,8 @@
 i8type=''
 ivsize=''
 ivtype=''
-nv_preserves_uv_bits=''
 nv_overflows_integers_at=''
+nv_preserves_uv_bits=''
 nvsize=''
 nvtype=''
 u16size=''
@@ -3592,7 +3592,7 @@
  \~/*|\~)
        echo \$1 | $sed "s|~|\${HOME-\$LOGDIR}|"
        ;;
- ~*)
+ \~*)
        if $test -f /bin/csh; then
                /bin/csh -f -c "glob \$1"
                failed=\$?

==== //depot/perl/Porting/Glossary#187 (text) ====
Index: perl/Porting/Glossary
--- perl/Porting/Glossary#186~33049~    2008-01-23 01:18:41.000000000 -0800
+++ perl/Porting/Glossary       2008-02-15 08:41:12.000000000 -0800
@@ -3795,15 +3795,15 @@
        full pathname (if any) of the nroff program.  After Configure runs,
        the value is reset to a plain "nroff" and is not useful.
 
-nv_preserves_uv_bits (perlxv.U):
-       This variable indicates how many of bits type uvtype
-       a variable nvtype can preserve.
-
 nv_overflows_integers_at (perlxv.U):
        This variable gives the largest integer value that NVs can hold
        as a constant floating point expression.
        If it could not be determined, it holds the value 0.
 
+nv_preserves_uv_bits (perlxv.U):
+       This variable indicates how many of bits type uvtype
+       a variable nvtype can preserve.
+
 nveformat (perlxvf.U):
        This variable contains the format string used for printing
        a Perl NV using %e-ish floating point format.

==== //depot/perl/config_h.SH#342 (text) ====
Index: perl/config_h.SH
--- perl/config_h.SH#341~33049~ 2008-01-23 01:18:41.000000000 -0800
+++ perl/config_h.SH    2008-02-15 08:41:12.000000000 -0800
@@ -957,19 +957,16 @@
 #if $cpp_stuff == 1
 #define CAT2(a,b)      a/**/b
 #define STRINGIFY(a)   "a"
-               /* If you can get stringification with catify, tell me how! */
 #endif
 #if $cpp_stuff == 42
 #define PeRl_CaTiFy(a, b)      a ## b
 #define PeRl_StGiFy(a) #a
-/* the additional level of indirection enables these macros to be
- * used as arguments to other macros.  See K&R 2nd ed., page 231. */
 #define CAT2(a,b)      PeRl_CaTiFy(a,b)
 #define StGiFy(a)      PeRl_StGiFy(a)
 #define STRINGIFY(a)   PeRl_StGiFy(a)
 #endif
 #if $cpp_stuff != 1 && $cpp_stuff != 42
-#   include "Bletch: How does this C preprocessor concatenate tokens?"
+#include "Bletch: How does this C preprocessor concatenate tokens?"
 #endif
 
 /* CPPSTDIN:
@@ -4300,7 +4297,7 @@
  *     This symbol contains the number of bits a variable of type NVTYPE
  *     can preserve of a variable of type UVTYPE.
  */
-/* NV_OVERFLOWS_INTEGERS_AT
+/* NV_OVERFLOWS_INTEGERS_AT:
  *     This symbol gives the largest integer value that NVs can hold. This
  *     value + 1.0 cannot be stored accurately. It is expressed as constant
  *     floating point expression to reduce the chance of decimale/binary
@@ -4420,7 +4417,9 @@
  *     Usual values include _iob, __iob, and __sF.
  */
 #$d_stdio_stream_array HAS_STDIO_STREAM_ARRAY  /**/
+#ifdef HAS_STDIO_STREAM_ARRAY
 #define STDIO_STREAM_ARRAY     $stdio_stream_array
+#endif
 
 /* USE_64_BIT_INT:
  *     This symbol, if defined, indicates that 64-bit integers should
End of Patch.

Reply via email to