Author: kargl
Date: Mon Jun 3 18:14:18 2013
New Revision: 251330
URL: http://svnweb.freebsd.org/changeset/base/251330
Log:
Update a comment to reflect that we are using an endpoint of
an interval instead of a midpoint.
Modified:
head/lib/msun/ld128/s_expl.c
head/lib/msun/ld80/s_expl.c
Modified: head/lib/msun/ld128/s_expl.c
==============================================================================
--- head/lib/msun/ld128/s_expl.c Mon Jun 3 18:13:25 2013
(r251329)
+++ head/lib/msun/ld128/s_expl.c Mon Jun 3 18:14:18 2013
(r251330)
@@ -226,7 +226,7 @@ expl(long double x)
return (1.0L + x);
}
- /* Reduce x to (k*ln2 + midpoint[n2] + r1 + r2). */
+ /* Reduce x to (k*ln2 + endpoint[n2] + r1 + r2). */
fn = x * INV_L + 0x1.8p112 - 0x1.8p112;
n = (int)fn;
n2 = (unsigned)n % INTERVALS;
Modified: head/lib/msun/ld80/s_expl.c
==============================================================================
--- head/lib/msun/ld80/s_expl.c Mon Jun 3 18:13:25 2013 (r251329)
+++ head/lib/msun/ld80/s_expl.c Mon Jun 3 18:14:18 2013 (r251330)
@@ -261,7 +261,7 @@ expl(long double x)
ENTERI();
- /* Reduce x to (k*ln2 + midpoint[n2] + r1 + r2). */
+ /* Reduce x to (k*ln2 + endpoint[n2] + r1 + r2). */
/* Use a specialized rint() to get fn. Assume round-to-nearest. */
fn = x * INV_L + 0x1.8p63 - 0x1.8p63;
r = x - fn * L1 - fn * L2; /* r = r1 + r2 done independently. */
_______________________________________________
svn-src-head@freebsd.org mailing list
http://lists.freebsd.org/mailman/listinfo/svn-src-head
To unsubscribe, send any mail to "svn-src-head-unsubscr...@freebsd.org"
