From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 8 May 2000 16:21:33 +0000 (+0000)
Subject: Introduce NV_PRESERVED_BITS.  Not yet used anywhere but
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bd026c32438ec68a31fc6a7281cbf547c5a94cb4;p=p5sagit%2Fp5-mst-13.2.git

Introduce NV_PRESERVED_BITS.  Not yet used anywhere but
might be useful in future.

p4raw-id: //depot/cfgperl@6095
---

diff --git a/Configure b/Configure
index 3ce1072..f503e2d 100755
--- 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 Sun May  7 18:52:04 EET DST 2000 [metaconfig 3.0 PL70]
+# Generated on Mon May  8 19:06:18 EET DST 2000 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.com)
 
 cat >/tmp/c1$$ <<EOF
@@ -792,6 +792,7 @@ version=''
 perl5=''
 perladmin=''
 perlpath=''
+d_nv_preserved_bits=''
 d_nv_preserves_uv=''
 i16size=''
 i16type=''
@@ -10190,6 +10191,39 @@ esac
 
 $rm -f try.* try
 
+case "$d_nv_preserves_uv" in
+"$define") d_nv_preserved_bits=`expr $uvsize \* 8` ;;
+*)	$echo "Checking how many bits of your UVs your NVs can preserve..." >&4
+	$cat <<EOP >try.c
+#include <stdio.h>
+int main() {
+    $uvtype u = 0;
+    int     n = 8 * $uvsize;
+    int     i;
+    for (i = 0; i < n; i++) {
+      u = u << 1 | ($uvtype)1;
+      if (($uvtype)($nvtype)u != u)
+        break;
+    }
+    printf("%d\n", i);
+    exit(0);
+}
+EOP
+	set try
+	if eval $compile; then
+		d_nv_preserved_bits="`./try$exe_ext`"
+	fi
+	case "$d_nv_preserved_bits" in
+	[1-9]*)	$echo "Your NVs can preserve $d_nv_preserved_bits of your NVs."  2>&1 ;;
+	*)	$echo "Can't figure out how many bits your NVs preserve." 2>&1
+		d_nv_preserved_bits="$undef"
+		;;
+	esac
+	$rm -f try.* try
+	;;
+esac
+
+
 
 : check for off64_t
 echo " "
@@ -15315,6 +15349,7 @@ d_msync='$d_msync'
 d_munmap='$d_munmap'
 d_mymalloc='$d_mymalloc'
 d_nice='$d_nice'
+d_nv_preserved_bits='$d_nv_preserved_bits'
 d_nv_preserves_uv='$d_nv_preserves_uv'
 d_off64_t='$d_off64_t'
 d_old_pthread_create_joinable='$d_old_pthread_create_joinable'
diff --git a/Porting/Glossary b/Porting/Glossary
index dbee4e6..1d6b188 100644
--- a/Porting/Glossary
+++ b/Porting/Glossary
@@ -1007,6 +1007,10 @@ d_nice (d_nice.U):
 	This variable conditionally defines the HAS_NICE symbol, which
 	indicates to the C program that the nice() routine is available.
 
+d_nv_preserved_bits (perlxv.U):
+	This variable indicates how many of bits type uvtype
+	a variable nvtype can preserve.
+
 d_nv_preserves_uv (perlxv.U):
 	This variable indicates whether a variable of type nvtype
 	can preserve all the bits a variable of type uvtype.
diff --git a/Porting/config.sh b/Porting/config.sh
index f2f659c..1da4de3 100644
--- a/Porting/config.sh
+++ b/Porting/config.sh
@@ -8,7 +8,7 @@
 
 # Package name      : perl5
 # Source directory  : .
-# Configuration time: Sun May  7 18:54:35 EET DST 2000
+# Configuration time: Mon May  8 19:17:48 EET DST 2000
 # Configured by     : jhi
 # Target system     : osf1 alpha.hut.fi v4.0 878 alpha 
 
@@ -59,7 +59,7 @@ ccflags='-pthread -std -DLANGUAGE_C'
 ccsymbols='__alpha=1 __LANGUAGE_C__=1 __osf__=1 __unix__=1 _LONGLONG=1 _SYSTYPE_BSD=1 SYSTYPE_BSD=1 unix=1'
 cf_by='jhi'
 cf_email='yourname@yourhost.yourplace.com'
-cf_time='Sun May  7 18:54:35 EET DST 2000'
+cf_time='Mon May  8 19:17:48 EET DST 2000'
 charsize='1'
 chgrp=''
 chmod=''
@@ -243,6 +243,7 @@ d_msync='define'
 d_munmap='define'
 d_mymalloc='undef'
 d_nice='define'
+d_nv_preserved_bits='53'
 d_nv_preserves_uv='undef'
 d_off64_t='undef'
 d_old_pthread_create_joinable='undef'
diff --git a/Porting/config_H b/Porting/config_H
index e5ba0d8..17afce5 100644
--- a/Porting/config_H
+++ b/Porting/config_H
@@ -17,7 +17,7 @@
 /*
  * Package name      : perl5
  * Source directory  : .
- * Configuration time: Sun May  7 18:54:35 EET DST 2000
+ * Configuration time: Mon May  8 19:17:48 EET DST 2000
  * Configured by     : jhi
  * Target system     : osf1 alpha.hut.fi v4.0 878 alpha 
  */
@@ -2652,7 +2652,7 @@
  */
 /* NV_PRESERVES_UV:
  *	This symbol, if defined, indicates that a variable of type NVTYPE
- *	can preserve all the bit of a variable of type UVSIZE.
+ *	can preserve all the bits of a variable of type UVTYPE.
  */
 #define	IVTYPE		long		/**/
 #define	UVTYPE		unsigned long		/**/
diff --git a/config_h.SH b/config_h.SH
index 12a4350..609726f 100644
--- a/config_h.SH
+++ b/config_h.SH
@@ -2666,7 +2666,7 @@ sed <<!GROK!THIS! >config.h -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un-
  */
 /* NV_PRESERVES_UV:
  *	This symbol, if defined, indicates that a variable of type NVTYPE
- *	can preserve all the bit of a variable of type UVSIZE.
+ *	can preserve all the bits of a variable of type UVTYPE.
  */
 #define	IVTYPE		$ivtype		/**/
 #define	UVTYPE		$uvtype		/**/