summary refs log tree commit diff
path: root/sysdeps/ieee754/ldbl-128/s_remquol.c
diff options
context:
space:
mode:
authorPaul E. Murphy <murphyp@linux.vnet.ibm.com>2016-09-02 11:01:07 -0500
committerPaul E. Murphy <murphyp@linux.vnet.ibm.com>2016-09-13 15:33:59 -0500
commit02bbfb414f367c73196e6f23fa7435a08c92449f (patch)
tree5f70a6d722dbdb1d716f6cf4b34fd7ca50e62c80 /sysdeps/ieee754/ldbl-128/s_remquol.c
parentfd37b5a78ab215ea2599250ec345e25545410bce (diff)
downloadglibc-02bbfb414f367c73196e6f23fa7435a08c92449f.tar.gz
glibc-02bbfb414f367c73196e6f23fa7435a08c92449f.tar.xz
glibc-02bbfb414f367c73196e6f23fa7435a08c92449f.zip
ldbl-128: Use L(x) macro for long double constants
This runs the attached sed script against these files using
a regex which aggressively matches long double literals
when not obviously part of a comment.

Likewise, 5 digit or less integral constants are replaced
with integer constants, excepting the two cases of 0 used
in large tables, which are also the only integral values
of the form x.0*E0L encountered within these converted
files.

Likewise, -L(x) is transformed into L(-x).

Naturally, the script has a few minor hiccups which are
more clearly remedied via the attached fixup patch.  Such
hiccups include, context-sensitive promotion to a real
type, and munging constants inside harder to detect
comment blocks.
Diffstat (limited to 'sysdeps/ieee754/ldbl-128/s_remquol.c')
-rw-r--r--sysdeps/ieee754/ldbl-128/s_remquol.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/sysdeps/ieee754/ldbl-128/s_remquol.c b/sysdeps/ieee754/ldbl-128/s_remquol.c
index f22026d35a..5fd0946bd4 100644
--- a/sysdeps/ieee754/ldbl-128/s_remquol.c
+++ b/sysdeps/ieee754/ldbl-128/s_remquol.c
@@ -87,7 +87,7 @@ __remquol (_Float128 x, _Float128 y, int *quo)
     }
   else
     {
-      _Float128 y_half = 0.5L * y;
+      _Float128 y_half = L(0.5) * y;
       if (x > y_half)
 	{
 	  x -= y;
@@ -103,8 +103,8 @@ __remquol (_Float128 x, _Float128 y, int *quo)
   *quo = qs ? -cquo : cquo;
 
   /* Ensure correct sign of zero result in round-downward mode.  */
-  if (x == 0.0L)
-    x = 0.0L;
+  if (x == 0)
+    x = 0;
   if (sx)
     x = -x;
   return x;