Module Name:    src
Committed By:   riastradh
Date:           Wed Jul 17 12:00:48 UTC 2024

Modified Files:
        src/lib/libm/arch/vax: n_support.S
        src/lib/libm/ld80: k_expl.h
        src/lib/libm/noieee_src: mathimpl.h
        src/lib/libm/src: e_fmodl.c s_atanl.c s_remquol.c

Log Message:
libm: Fix `mantissa' to say `significand' in comments.

(mantissa = fractional part of log(significand))

No functional change intended.


To generate a diff of this commit:
cvs rdiff -u -r1.12 -r1.13 src/lib/libm/arch/vax/n_support.S
cvs rdiff -u -r1.1 -r1.2 src/lib/libm/ld80/k_expl.h
cvs rdiff -u -r1.10 -r1.11 src/lib/libm/noieee_src/mathimpl.h
cvs rdiff -u -r1.2 -r1.3 src/lib/libm/src/e_fmodl.c
cvs rdiff -u -r1.7 -r1.8 src/lib/libm/src/s_atanl.c
cvs rdiff -u -r1.5 -r1.6 src/lib/libm/src/s_remquol.c

Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.

Modified files:

Index: src/lib/libm/arch/vax/n_support.S
diff -u src/lib/libm/arch/vax/n_support.S:1.12 src/lib/libm/arch/vax/n_support.S:1.13
--- src/lib/libm/arch/vax/n_support.S:1.12	Wed May  8 01:04:24 2024
+++ src/lib/libm/arch/vax/n_support.S	Wed Jul 17 12:00:48 2024
@@ -1,4 +1,4 @@
-/*	$NetBSD: n_support.S,v 1.12 2024/05/08 01:04:24 riastradh Exp $	*/
+/*	$NetBSD: n_support.S,v 1.13 2024/07/17 12:00:48 riastradh Exp $	*/
 /*
  * Copyright (c) 1985, 1993
  *	The Regents of the University of California.  All rights reserved.
@@ -108,7 +108,7 @@ STRONG_ALIAS(_finitef, _finite)
 #endif
 WEAK_ALIAS(finite, _finite)
 ENTRY(_finite, 0)
-	bicw3	$0x7f,4(%ap),%r0	# mask off the mantissa
+	bicw3	$0x7f,4(%ap),%r0	# mask off the significand
 	cmpw	%r0,$0x8000		# to see if x is the reserved op
 	beql	1f			# if so, return FALSE (0)
 	movl	$1,%r0			# else return TRUE (1)

Index: src/lib/libm/ld80/k_expl.h
diff -u src/lib/libm/ld80/k_expl.h:1.1 src/lib/libm/ld80/k_expl.h:1.2
--- src/lib/libm/ld80/k_expl.h:1.1	Sun Jan 21 18:53:17 2024
+++ src/lib/libm/ld80/k_expl.h	Wed Jul 17 12:00:48 2024
@@ -79,7 +79,7 @@ static const struct {
 	/*
 	 * XXX hi is rounded down, and the formatting is not quite normal.
 	 * But I rather like both.  The 0x1.*p format is good for 4N+1
-	 * mantissa bits.  Rounding down makes the lo terms positive,
+	 * significand bits.  Rounding down makes the lo terms positive,
 	 * so that the columnar formatting can be simpler.
 	 */
 	{ 0x1.0163da9fb3335p+0, 0x1.b61299ab8cdb7p-54 },

Index: src/lib/libm/noieee_src/mathimpl.h
diff -u src/lib/libm/noieee_src/mathimpl.h:1.10 src/lib/libm/noieee_src/mathimpl.h:1.11
--- src/lib/libm/noieee_src/mathimpl.h:1.10	Wed Nov  2 02:34:56 2011
+++ src/lib/libm/noieee_src/mathimpl.h	Wed Jul 17 12:00:48 2024
@@ -1,4 +1,4 @@
-/*	$NetBSD: mathimpl.h,v 1.10 2011/11/02 02:34:56 christos Exp $	*/
+/*	$NetBSD: mathimpl.h,v 1.11 2024/07/17 12:00:48 riastradh Exp $	*/
 /*
  * Copyright (c) 1988, 1993
  *	The Regents of the University of California.  All rights reserved.
@@ -56,7 +56,7 @@
     * Args are the name to define, the decimal floating point value,
     * four 16-bit chunks of the float value in hex
     * (because the vax and tahoe differ in float format!), the power
-    * of 2 of the hex-float exponent, and the hex-float mantissa.
+    * of 2 of the hex-float exponent, and the hex-float significand.
     * Most of these arguments are not used at compile time; they are
     * used in a post-check to make sure the constants were compiled
     * correctly.

Index: src/lib/libm/src/e_fmodl.c
diff -u src/lib/libm/src/e_fmodl.c:1.2 src/lib/libm/src/e_fmodl.c:1.3
--- src/lib/libm/src/e_fmodl.c:1.2	Thu Nov 14 15:25:22 2013
+++ src/lib/libm/src/e_fmodl.c	Wed Jul 17 12:00:48 2024
@@ -11,7 +11,7 @@
  */
 
 #include <sys/cdefs.h>
-__RCSID("$NetBSD: e_fmodl.c,v 1.2 2013/11/14 15:25:22 martin Exp $");
+__RCSID("$NetBSD: e_fmodl.c,v 1.3 2024/07/17 12:00:48 riastradh Exp $");
 #if 0
 __FBSDID("$FreeBSD: head/lib/msun/src/e_fmodl.c 181063 2008-07-31 20:09:47Z das $");
 #endif
@@ -43,8 +43,8 @@ typedef	uint32_t manh_t;
 
 /*
  * These macros add and remove an explicit integer bit in front of the
- * fractional mantissa, if the architecture doesn't have such a bit by
- * default already.
+ * fractional significand, if the architecture doesn't have such a bit
+ * by default already.
  */
 #ifdef LDBL_IMPLICIT_NBIT
 #define	SET_NBIT(hx)	((hx) | (1ULL << EXT_FRACHBITS))
@@ -65,9 +65,9 @@ static const long double one = 1.0, Zero
  * Method: shift and subtract
  *
  * Assumptions:
- * - The low part of the mantissa fits in a manl_t exactly.
- * - The high part of the mantissa fits in an int64_t with enough room
- *   for an explicit integer bit in front of the fractional bits.
+ * - The low part of the significand fits in a manl_t exactly.
+ * - The high part of the significand fits in an int64_t with enough
+ *   room for an explicit integer bit in front of the fractional bits.
  */
 long double
 __ieee754_fmodl(long double x, long double y)
@@ -143,7 +143,7 @@ __ieee754_fmodl(long double x, long doub
 	    hx = hx+hx+(lx>>MANL_SHIFT); lx = lx+lx;
 	    iy -= 1;
 	}
-	ux.extu_frach = hx; /* The mantissa is truncated here if needed. */
+	ux.extu_frach = hx; /* The significand is truncated here if needed. */
 	ux.extu_fracl = lx;
 	if (iy < LDBL_MIN_EXP) {
 	    ux.extu_exp = iy + (BIAS + 512);

Index: src/lib/libm/src/s_atanl.c
diff -u src/lib/libm/src/s_atanl.c:1.7 src/lib/libm/src/s_atanl.c:1.8
--- src/lib/libm/src/s_atanl.c:1.7	Sun Jun  9 13:35:38 2024
+++ src/lib/libm/src/s_atanl.c	Wed Jul 17 12:00:48 2024
@@ -1,4 +1,4 @@
-/*	$NetBSD: s_atanl.c,v 1.7 2024/06/09 13:35:38 riastradh Exp $	*/
+/*	$NetBSD: s_atanl.c,v 1.8 2024/07/17 12:00:48 riastradh Exp $	*/
 
 /* FreeBSD: head/lib/msun/src/s_atan.c 176451 2008-02-22 02:30:36Z das */
 /*
@@ -13,7 +13,7 @@
  */
 
 #include <sys/cdefs.h>
-__RCSID("$NetBSD: s_atanl.c,v 1.7 2024/06/09 13:35:38 riastradh Exp $");
+__RCSID("$NetBSD: s_atanl.c,v 1.8 2024/07/17 12:00:48 riastradh Exp $");
 
 #include "namespace.h"
 
@@ -67,7 +67,7 @@ atanl(long double x)
 	    if(expsign>0) return  atanhi[3]+atanlo[3];
 	    else     return -atanhi[3]-atanlo[3];
 	}
-	/* Extract the exponent and the first few bits of the mantissa. */
+	/* Extract the exponent and the first few bits of the significand. */
 	/* XXX There should be a more convenient way to do this. */
 	expman = (expt << 8) | ((u.extu_frach >> (MANH_SIZE - 9)) & 0xff);
 	if (expman < ((BIAS - 2) << 8) + 0xc0) {	/* |x| < 0.4375 */

Index: src/lib/libm/src/s_remquol.c
diff -u src/lib/libm/src/s_remquol.c:1.5 src/lib/libm/src/s_remquol.c:1.6
--- src/lib/libm/src/s_remquol.c:1.5	Sat Feb 24 19:32:09 2024
+++ src/lib/libm/src/s_remquol.c	Wed Jul 17 12:00:48 2024
@@ -46,8 +46,8 @@ typedef	uint32_t manh_t;
 
 /*
  * These macros add and remove an explicit integer bit in front of the
- * fractional mantissa, if the architecture doesn't have such a bit by
- * default already.
+ * fractional significand, if the architecture doesn't have such a bit
+ * by default already.
  */
 #ifdef LDBL_IMPLICIT_NBIT
 #define	SET_NBIT(hx)	((hx) | (1ULL << EXT_FRACHBITS))
@@ -70,9 +70,9 @@ static const long double Zero[] = {0.0L,
  * remquo in reduction algorithms.
  *
  * Assumptions:
- * - The low part of the mantissa fits in a manl_t exactly.
- * - The high part of the mantissa fits in an int64_t with enough room
- *   for an explicit integer bit in front of the fractional bits.
+ * - The low part of the significand fits in a manl_t exactly.
+ * - The high part of the significand fits in an int64_t with enough
+ *   room for an explicit integer bit in front of the fractional bits.
  */
 long double
 remquol(long double x, long double y, int *quo)

Reply via email to