Update.

	* sysdeps/i386/fpu/libm-test-ulps: Update for changes in libm-test.inc.

2000-10-16  Jakub Jelinek  <jakub@redhat.com>

	* math/libm-test.inc (M_LOG_SQRT_PIl, M_LOG_2_SQRT_PIl): Increase
	precision.
	(acos_test, asin_text, cexp_test, cos_test, cproj_test, exp10_test,
	sin_test, sincos_test, sqrt_test): Likewise.  Add L suffixes also
	to parameters.
	(acosh_test, asinh_test, atan2_test, atanh_test, atan_test, cabs_test,
	cacosh_test, cacos_test, casinh_test, casin_test, catanh_test,
	catan_test, cbrt_test, ccosh_test, ccos_test, clog10_test, cosh_test,
	csinh_test, csin_test, csqrt_test, ctanh_test, ctan_test, erfc_test,
	erf_test, exp2_test, expm1_test, exp_test, fmod_test, hypot_test,
	j0_test, j1_test, jn_test, lgamma_test, llrint_test, llround_test,
	log10_test, log1p_test, log2_test, log_test, lrint_test, lround_test,
	nextafter_test, nexttoward_test, pow_test, round_test, scalb_test,
	sinh_test, static void, tanh_test, tan_test, tgamma_test, y0_test,
	y1_test, yn_test): Add L suffixes also to parameters.
	* sysdeps/ieee754/ldbl-128/s_ceill.c (__ceill): Fix mask.
	* sysdeps/ieee754/ldbl-128/s_floorl.c (__floorl): Likewise.
	* soft-fp/op-2.h (_FP_FRAC_SRS_2): Fix computation of sticky bit.

2000-10-16  Ulrich Drepper  <drepper@redhat.com>

1 files changed, 184 insertions, 184 deletions

diff --git a/math/libm-test.inc b/math/libm-test.inc
index 1b9e08b3c8..9b5fe84078 100644
--- a/math/libm-test.inc
+++ b/math/libm-test.inc
@@ -139,8 +139,8 @@
 #define M_E3l			20.085536923187667740928529654581719L
 #define M_2_SQRT_PIl		3.5449077018110320545963349666822903L	/* 2 sqrt (M_PIl)  */
 #define M_SQRT_PIl		1.7724538509055160272981674833411451L	/* sqrt (M_PIl)  */
-#define M_LOG_SQRT_PIl		0.572364942924700087072L	/* log(sqrt(M_PIl))  */
-#define M_LOG_2_SQRT_PIl	1.265512123484645396489L	/* log(2*sqrt(M_PIl))  */
+#define M_LOG_SQRT_PIl		0.57236494292470008707171367567652933L	/* log(sqrt(M_PIl))  */
+#define M_LOG_2_SQRT_PIl	1.265512123484645396488945797134706L	/* log(2*sqrt(M_PIl))  */
 #define M_PI_34l		(M_PIl - M_PI_4l)		/* 3*pi/4 */
 #define M_PI_34_LOG10El		(M_PIl - M_PI_4l) * M_LOG10El
 #define M_PI2_LOG10El		M_PI_2l * M_LOG10El
@@ -707,8 +707,8 @@ acos_test (void)
   TEST_f_f (acos, nan_value, nan_value);
 
   /* |x| > 1: */
-  TEST_f_f (acos, 1.1, nan_value, INVALID_EXCEPTION);
-  TEST_f_f (acos, -1.1, nan_value, INVALID_EXCEPTION);
+  TEST_f_f (acos, 1.1L, nan_value, INVALID_EXCEPTION);
+  TEST_f_f (acos, -1.1L, nan_value, INVALID_EXCEPTION);
 
   TEST_f_f (acos, 0, M_PI_2l);
   TEST_f_f (acos, minus_zero, M_PI_2l);
@@ -716,7 +716,7 @@ acos_test (void)
   TEST_f_f (acos, -1, M_PIl);
   TEST_f_f (acos, 0.5, M_PI_6l*2.0);
   TEST_f_f (acos, -0.5, M_PI_6l*4.0);
-  TEST_f_f (acos, 0.7, 0.7953988301841435554L);
+  TEST_f_f (acos, 0.7L, 0.79539883018414355549096833892476432L);
 
   END (acos);
 }
@@ -736,7 +736,7 @@ acosh_test (void)
   TEST_f_f (acosh, minus_infty, nan_value, INVALID_EXCEPTION);
 
   /* x < 1:  */
-  TEST_f_f (acosh, -1.1, nan_value, INVALID_EXCEPTION);
+  TEST_f_f (acosh, -1.1L, nan_value, INVALID_EXCEPTION);
 
   TEST_f_f (acosh, 1, 0);
   TEST_f_f (acosh, 7, 2.6339157938496334172L);
@@ -760,8 +760,8 @@ asin_test (void)
   TEST_f_f (asin, nan_value, nan_value);
 
   /* asin x == NaN plus invalid exception for |x| > 1.  */
-  TEST_f_f (asin, 1.1, nan_value, INVALID_EXCEPTION);
-  TEST_f_f (asin, -1.1, nan_value, INVALID_EXCEPTION);
+  TEST_f_f (asin, 1.1L, nan_value, INVALID_EXCEPTION);
+  TEST_f_f (asin, -1.1L, nan_value, INVALID_EXCEPTION);
 
   TEST_f_f (asin, 0, 0);
   TEST_f_f (asin, minus_zero, minus_zero);
@@ -769,7 +769,7 @@ asin_test (void)
   TEST_f_f (asin, -0.5, -M_PI_6l);
   TEST_f_f (asin, 1.0, M_PI_2l);
   TEST_f_f (asin, -1.0, -M_PI_2l);
-  TEST_f_f (asin, 0.7, 0.7753974966107530637L);
+  TEST_f_f (asin, 0.7L, 0.77539749661075306374035335271498708L);
 
   END (asin);
 }
@@ -778,7 +778,7 @@ static void
 asinh_test (void)
 {
   errno = 0;
-  FUNC(asinh) (0.7);
+  FUNC(asinh) (0.7L);
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -792,7 +792,7 @@ asinh_test (void)
   TEST_f_f (asinh, minus_infty, minus_infty);
 #endif
   TEST_f_f (asinh, nan_value, nan_value);
-  TEST_f_f (asinh, 0.7, 0.652666566082355786L);
+  TEST_f_f (asinh, 0.7L, 0.652666566082355786L);
 
   END (asinh);
 }
@@ -818,7 +818,7 @@ atan_test (void)
   TEST_f_f (atan, 1, M_PI_4l);
   TEST_f_f (atan, -1, -M_PI_4l);
 
-  TEST_f_f (atan, 0.7, 0.6107259643892086165L);
+  TEST_f_f (atan, 0.7L, 0.6107259643892086165L);
 
   END (atan);
 }
@@ -829,7 +829,7 @@ static void
 atanh_test (void)
 {
   errno = 0;
-  FUNC(atanh) (0.7);
+  FUNC(atanh) (0.7L);
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -845,10 +845,10 @@ atanh_test (void)
   TEST_f_f (atanh, nan_value, nan_value);
 
   /* atanh (x) == NaN plus invalid exception if |x| > 1.  */
-  TEST_f_f (atanh, 1.1, nan_value, INVALID_EXCEPTION);
-  TEST_f_f (atanh, -1.1, nan_value, INVALID_EXCEPTION);
+  TEST_f_f (atanh, 1.1L, nan_value, INVALID_EXCEPTION);
+  TEST_f_f (atanh, -1.1L, nan_value, INVALID_EXCEPTION);
 
-  TEST_f_f (atanh, 0.7, 0.8673005276940531944L);
+  TEST_f_f (atanh, 0.7L, 0.8673005276940531944L);
 
   END (atanh);
 }
@@ -918,8 +918,8 @@ atan2_test (void)
   TEST_ff_f (atan2, minus_infty, minus_infty, -M_PI_34l);
   TEST_ff_f (atan2, nan_value, nan_value, nan_value);
 
-  TEST_ff_f (atan2, 0.7, 1, 0.6107259643892086165L);
-  TEST_ff_f (atan2, 0.4, 0.0003, 1.5700463269355215718L);
+  TEST_ff_f (atan2, 0.7L, 1, 0.6107259643892086165L);
+  TEST_ff_f (atan2, 0.4L, 0.0003L, 1.5700463269355215718L);
 
   END (atan2);
 }
@@ -929,7 +929,7 @@ static void
 cabs_test (void)
 {
   errno = 0;
-  FUNC(cabs) (BUILD_COMPLEX (0.7, 12.4));
+  FUNC(cabs) (BUILD_COMPLEX (0.7L, 12.4L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -966,7 +966,7 @@ cabs_test (void)
   TEST_c_f (cabs, -5.7e7L, 0, 5.7e7L);
   TEST_c_f (cabs, 5.7e7L, 0, 5.7e7L);
 
-  TEST_c_f (cabs, 0.7, 1.2, 1.3892443989449804508L);
+  TEST_c_f (cabs, 0.7L, 1.2L, 1.3892443989449804508L);
 
   END (cabs);
 }
@@ -975,7 +975,7 @@ static void
 cacos_test (void)
 {
   errno = 0;
-  FUNC(cacos) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(cacos) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -998,8 +998,8 @@ cacos_test (void)
   TEST_c_c (cacos, -10.0, minus_infty, M_PI_2l, plus_infty);
   TEST_c_c (cacos, 0, plus_infty, M_PI_2l, minus_infty);
   TEST_c_c (cacos, 0, minus_infty, M_PI_2l, plus_infty);
-  TEST_c_c (cacos, 0.1, plus_infty, M_PI_2l, minus_infty);
-  TEST_c_c (cacos, 0.1, minus_infty, M_PI_2l, plus_infty);
+  TEST_c_c (cacos, 0.1L, plus_infty, M_PI_2l, minus_infty);
+  TEST_c_c (cacos, 0.1L, minus_infty, M_PI_2l, plus_infty);
 
   TEST_c_c (cacos, minus_infty, 0, M_PIl, minus_infty);
   TEST_c_c (cacos, minus_infty, minus_zero, M_PIl, plus_infty);
@@ -1028,7 +1028,7 @@ cacos_test (void)
 
   TEST_c_c (cacos, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (cacos, 0.7, 1.2, 1.1351827477151551089L, -1.0927647857577371459L);
+  TEST_c_c (cacos, 0.7L, 1.2L, 1.1351827477151551089L, -1.0927647857577371459L);
   TEST_c_c (cacos, -2, -3, 2.1414491111159960199L, 1.9833870299165354323L);
 
   END (cacos, complex);
@@ -1039,7 +1039,7 @@ static void
 cacosh_test (void)
 {
   errno = 0;
-  FUNC(cacosh) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(cacosh) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1061,8 +1061,8 @@ cacosh_test (void)
   TEST_c_c (cacosh, -10.0, minus_infty, plus_infty, -M_PI_2l);
   TEST_c_c (cacosh, 0, plus_infty, plus_infty, M_PI_2l);
   TEST_c_c (cacosh, 0, minus_infty, plus_infty, -M_PI_2l);
-  TEST_c_c (cacosh, 0.1, plus_infty, plus_infty, M_PI_2l);
-  TEST_c_c (cacosh, 0.1, minus_infty, plus_infty, -M_PI_2l);
+  TEST_c_c (cacosh, 0.1L, plus_infty, plus_infty, M_PI_2l);
+  TEST_c_c (cacosh, 0.1L, minus_infty, plus_infty, -M_PI_2l);
 
   TEST_c_c (cacosh, minus_infty, 0, plus_infty, M_PIl);
   TEST_c_c (cacosh, minus_infty, minus_zero, plus_infty, -M_PIl);
@@ -1091,7 +1091,7 @@ cacosh_test (void)
 
   TEST_c_c (cacosh, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (cacosh, 0.7, 1.2, 1.0927647857577371459L, 1.1351827477151551089L);
+  TEST_c_c (cacosh, 0.7L, 1.2L, 1.0927647857577371459L, 1.1351827477151551089L);
   TEST_c_c (cacosh, -2, -3, -1.9833870299165354323L, 2.1414491111159960199L);
 
   END (cacosh, complex);
@@ -1168,7 +1168,7 @@ static void
 casin_test (void)
 {
   errno = 0;
-  FUNC(casin) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(casin) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1191,8 +1191,8 @@ casin_test (void)
   TEST_c_c (casin, 0, minus_infty, 0.0, minus_infty);
   TEST_c_c (casin, minus_zero, plus_infty, minus_zero, plus_infty);
   TEST_c_c (casin, minus_zero, minus_infty, minus_zero, minus_infty);
-  TEST_c_c (casin, 0.1, plus_infty, 0.0, plus_infty);
-  TEST_c_c (casin, 0.1, minus_infty, 0.0, minus_infty);
+  TEST_c_c (casin, 0.1L, plus_infty, 0.0, plus_infty);
+  TEST_c_c (casin, 0.1L, minus_infty, 0.0, minus_infty);
 
   TEST_c_c (casin, minus_infty, 0, -M_PI_2l, plus_infty);
   TEST_c_c (casin, minus_infty, minus_zero, -M_PI_2l, minus_infty);
@@ -1221,7 +1221,7 @@ casin_test (void)
 
   TEST_c_c (casin, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (casin, 0.7, 1.2, 0.4356135790797415103L, 1.0927647857577371459L);
+  TEST_c_c (casin, 0.7L, 1.2L, 0.4356135790797415103L, 1.0927647857577371459L);
   TEST_c_c (casin, -2, -3, -0.5706527843210994007L, -1.9833870299165354323L);
 
   END (casin, complex);
@@ -1232,7 +1232,7 @@ static void
 casinh_test (void)
 {
   errno = 0;
-  FUNC(casinh) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(casinh) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1255,8 +1255,8 @@ casinh_test (void)
   TEST_c_c (casinh, 0, minus_infty, plus_infty, -M_PI_2l);
   TEST_c_c (casinh, minus_zero, plus_infty, minus_infty, M_PI_2l);
   TEST_c_c (casinh, minus_zero, minus_infty, minus_infty, -M_PI_2l);
-  TEST_c_c (casinh, 0.1, plus_infty, plus_infty, M_PI_2l);
-  TEST_c_c (casinh, 0.1, minus_infty, plus_infty, -M_PI_2l);
+  TEST_c_c (casinh, 0.1L, plus_infty, plus_infty, M_PI_2l);
+  TEST_c_c (casinh, 0.1L, minus_infty, plus_infty, -M_PI_2l);
 
   TEST_c_c (casinh, minus_infty, 0, minus_infty, 0.0);
   TEST_c_c (casinh, minus_infty, minus_zero, minus_infty, minus_zero);
@@ -1285,7 +1285,7 @@ casinh_test (void)
 
   TEST_c_c (casinh, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (casinh, 0.7, 1.2, 0.9786545955936738768L, 0.9113541895315601156L);
+  TEST_c_c (casinh, 0.7L, 1.2L, 0.9786545955936738768L, 0.9113541895315601156L);
   TEST_c_c (casinh, -2, -3, -1.9686379257930962917L, -0.9646585044076027920L);
 
   END (casinh, complex);
@@ -1296,7 +1296,7 @@ static void
 catan_test (void)
 {
   errno = 0;
-  FUNC(catan) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(catan) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1320,8 +1320,8 @@ catan_test (void)
   TEST_c_c (catan, minus_infty, minus_zero, -M_PI_2l, minus_zero);
   TEST_c_c (catan, plus_infty, 0.0, M_PI_2l, 0);
   TEST_c_c (catan, minus_infty, 0.0, -M_PI_2l, 0);
-  TEST_c_c (catan, plus_infty, 0.1, M_PI_2l, 0);
-  TEST_c_c (catan, minus_infty, 0.1, -M_PI_2l, 0);
+  TEST_c_c (catan, plus_infty, 0.1L, M_PI_2l, 0);
+  TEST_c_c (catan, minus_infty, 0.1L, -M_PI_2l, 0);
 
   TEST_c_c (catan, 0.0, minus_infty, M_PI_2l, minus_zero);
   TEST_c_c (catan, minus_zero, minus_infty, -M_PI_2l, minus_zero);
@@ -1353,7 +1353,7 @@ catan_test (void)
 
   TEST_c_c (catan, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (catan, 0.7, 1.2, 1.0785743834118921877L, 0.5770573776534306764L);
+  TEST_c_c (catan, 0.7L, 1.2L, 1.0785743834118921877L, 0.5770573776534306764L);
 
   TEST_c_c (catan, -2, -3, -1.4099210495965755225L, -0.2290726829685387662L);
 
@@ -1364,7 +1364,7 @@ static void
 catanh_test (void)
 {
   errno = 0;
-  FUNC(catanh) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(catanh) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1387,8 +1387,8 @@ catanh_test (void)
   TEST_c_c (catanh, minus_zero, minus_infty, minus_zero, -M_PI_2l);
   TEST_c_c (catanh, 0, plus_infty, 0.0, M_PI_2l);
   TEST_c_c (catanh, 0, minus_infty, 0.0, -M_PI_2l);
-  TEST_c_c (catanh, 0.1, plus_infty, 0.0, M_PI_2l);
-  TEST_c_c (catanh, 0.1, minus_infty, 0.0, -M_PI_2l);
+  TEST_c_c (catanh, 0.1L, plus_infty, 0.0, M_PI_2l);
+  TEST_c_c (catanh, 0.1L, minus_infty, 0.0, -M_PI_2l);
 
   TEST_c_c (catanh, minus_infty, 0, minus_zero, M_PI_2l);
   TEST_c_c (catanh, minus_infty, minus_zero, minus_zero, -M_PI_2l);
@@ -1420,7 +1420,7 @@ catanh_test (void)
 
   TEST_c_c (catanh, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (catanh, 0.7, 1.2, 0.2600749516525135959L, 0.9702403077950989849L);
+  TEST_c_c (catanh, 0.7L, 1.2L, 0.2600749516525135959L, 0.9702403077950989849L);
   TEST_c_c (catanh, -2, -3, -0.1469466662255297520L, -1.3389725222944935611L);
 
   END (catanh, complex);
@@ -1444,11 +1444,11 @@ cbrt_test (void)
   TEST_f_f (cbrt, minus_infty, minus_infty);
   TEST_f_f (cbrt, nan_value, nan_value);
 
-  TEST_f_f (cbrt, -0.001, -0.1L);
+  TEST_f_f (cbrt, -0.001L, -0.1L);
   TEST_f_f (cbrt, 8, 2);
   TEST_f_f (cbrt, -27.0, -3.0);
-  TEST_f_f (cbrt, 0.970299, 0.99L);
-  TEST_f_f (cbrt, 0.7, 0.8879040017426007084L);
+  TEST_f_f (cbrt, 0.970299L, 0.99L);
+  TEST_f_f (cbrt, 0.7L, 0.8879040017426007084L);
 
   END (cbrt);
 }
@@ -1514,7 +1514,7 @@ ccos_test (void)
 
   TEST_c_c (ccos, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (ccos, 0.7, 1.2, 1.3848657645312111080L, -0.97242170335830028619L);
+  TEST_c_c (ccos, 0.7L, 1.2L, 1.3848657645312111080L, -0.97242170335830028619L);
 
   TEST_c_c (ccos, -2, -3, -4.1896256909688072301L, -9.1092278937553365979L);
 
@@ -1526,7 +1526,7 @@ static void
 ccosh_test (void)
 {
   errno = 0;
-  FUNC(ccosh) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(ccosh) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1583,7 +1583,7 @@ ccosh_test (void)
 
   TEST_c_c (ccosh, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (ccosh, 0.7, 1.2, 0.4548202223691477654L, 0.7070296600921537682L);
+  TEST_c_c (ccosh, 0.7L, 1.2L, 0.4548202223691477654L, 0.7070296600921537682L);
 
   TEST_c_c (ccosh, -2, -3, -3.7245455049153225654L, 0.5118225699873846088L);
 
@@ -1666,7 +1666,7 @@ cexp_test (void)
   TEST_c_c (cexp, 1, nan_value, nan_value, nan_value, INVALID_EXCEPTION_OK);
   TEST_c_c (cexp, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (cexp, 0.7, 1.2, 0.7296989091503236012L, 1.8768962328348102821L);
+  TEST_c_c (cexp, 0.7L, 1.2L, 0.72969890915032360123451688642930727L, 1.8768962328348102821139467908203072L);
   TEST_c_c (cexp, -2.0, -3.0, -0.1339809149295426134L, -0.0190985162611351964L);
 
   END (cexp, complex);
@@ -1756,7 +1756,7 @@ static void
 clog10_test (void)
 {
   errno = 0;
-  FUNC(clog10) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(clog10) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1811,7 +1811,7 @@ clog10_test (void)
 
   TEST_c_c (clog10, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (clog10, 0.7, 1.2, 0.1427786545038868803L, 0.4528483579352493248L);
+  TEST_c_c (clog10, 0.7L, 1.2L, 0.1427786545038868803L, 0.4528483579352493248L);
   TEST_c_c (clog10, -2, -3, 0.5569716761534183846L, -0.9375544629863747085L);
 
   END (clog10, complex);
@@ -1883,7 +1883,7 @@ cos_test (void)
   TEST_f_f (cos, M_PI_6l * 4.0, -0.5);
   TEST_f_f (cos, M_PI_2l, 0);
 
-  TEST_f_f (cos, 0.7, 0.7648421872844884262L);
+  TEST_f_f (cos, 0.7L, 0.76484218728448842625585999019186495L);
 
   END (cos);
 }
@@ -1892,7 +1892,7 @@ static void
 cosh_test (void)
 {
   errno = 0;
-  FUNC(cosh) (0.7);
+  FUNC(cosh) (0.7L);
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -1907,7 +1907,7 @@ cosh_test (void)
 #endif
   TEST_f_f (cosh, nan_value, nan_value);
 
-  TEST_f_f (cosh, 0.7, 1.255169005630943018L);
+  TEST_f_f (cosh, 0.7L, 1.255169005630943018L);
   END (cosh);
 }
 
@@ -1951,7 +1951,7 @@ cproj_test (void)
   TEST_c_c (cproj, minus_infty, minus_infty, plus_infty, minus_zero);
 
   TEST_c_c (cproj, 1.0, 0.0, 1.0, 0.0);
-  TEST_c_c (cproj, 2.0, 3.0, 0.28571428571428571429L, .42857142857142857143L);
+  TEST_c_c (cproj, 2.0, 3.0, 0.2857142857142857142857142857142857L, 0.42857142857142857142857142857142855L);
 
   END (cproj, complex);
 }
@@ -1975,7 +1975,7 @@ static void
 csin_test (void)
 {
   errno = 0;
-  FUNC(csin) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(csin) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -2032,7 +2032,7 @@ csin_test (void)
 
   TEST_c_c (csin, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (csin, 0.7, 1.2, 1.1664563419657581376L, 1.1544997246948547371L);
+  TEST_c_c (csin, 0.7L, 1.2L, 1.1664563419657581376L, 1.1544997246948547371L);
 
   TEST_c_c (csin, -2, -3, -9.1544991469114295734L, 4.1689069599665643507L);
 
@@ -2044,7 +2044,7 @@ static void
 csinh_test (void)
 {
   errno = 0;
-  FUNC(csinh) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(csinh) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -2101,7 +2101,7 @@ csinh_test (void)
 
   TEST_c_c (csinh, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (csinh, 0.7, 1.2, 0.27487868678117583582L, 1.1698665727426565139L);
+  TEST_c_c (csinh, 0.7L, 1.2L, 0.27487868678117583582L, 1.1698665727426565139L);
   TEST_c_c (csinh, -2, -3, 3.5905645899857799520L, -0.5309210862485198052L);
 
   END (csinh, complex);
@@ -2166,7 +2166,7 @@ csqrt_test (void)
   TEST_c_c (csqrt, -1, 0, 0.0, 1.0);
   TEST_c_c (csqrt, 0, 2, 1.0, 1.0);
   TEST_c_c (csqrt, 119, 120, 12.0, 5.0);
-  TEST_c_c (csqrt, 0.7, 1.2, 1.0220676100300264507L, 0.5870453129635652115L);
+  TEST_c_c (csqrt, 0.7L, 1.2L, 1.0220676100300264507L, 0.5870453129635652115L);
   TEST_c_c (csqrt, -2, -3, 0.8959774761298381247L, -1.6741492280355400404L);
   TEST_c_c (csqrt, -2, 3, 0.8959774761298381247L, 1.6741492280355400404L);
 
@@ -2177,7 +2177,7 @@ static void
 ctan_test (void)
 {
   errno = 0;
-  FUNC(ctan) (BUILD_COMPLEX (0.7, 1.2));
+  FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -2224,7 +2224,7 @@ ctan_test (void)
 
   TEST_c_c (ctan, nan_value, nan_value, nan_value, nan_value);
 
-  TEST_c_c (ctan, 0.7, 1.2, 0.1720734197630349001L, 0.9544807059989405538L);
+  TEST_c_c (ctan, 0.7L, 1.2L, 0.1720734197630349001L, 0.9544807059989405538L);
   TEST_c_c (ctan, -2, -3, 0.0037640256415042482L, -1.0032386273536098014L);
 
   END (ctan, complex);
@@ -2283,7 +2283,7 @@ ctanh_test (void)
 
   TEST_c_c (ctanh, 0, M_PI_4l, 0.0, 1.0);
 
-  TEST_c_c (ctanh, 0.7, 1.2, 1.3472197399061191630L, 0.4778641038326365540L);
+  TEST_c_c (ctanh, 0.7L, 1.2L, 1.3472197399061191630L, 0.4778641038326365540L);
   TEST_c_c (ctanh, -2, -3, -0.9653858790221331242L, 0.0098843750383224937L);
 
   END (ctanh, complex);
@@ -2306,11 +2306,11 @@ erf_test (void)
   TEST_f_f (erf, minus_infty, -1);
   TEST_f_f (erf, nan_value, nan_value);
 
-  TEST_f_f (erf, 0.7, 0.67780119383741847297L);
+  TEST_f_f (erf, 0.7L, 0.67780119383741847297L);
 
-  TEST_f_f (erf, 1.2, 0.91031397822963538024L);
+  TEST_f_f (erf, 1.2L, 0.91031397822963538024L);
   TEST_f_f (erf, 2.0, 0.99532226501895273416L);
-  TEST_f_f (erf, 4.1, 0.99999999329997234592L);
+  TEST_f_f (erf, 4.1L, 0.99999999329997234592L);
   TEST_f_f (erf, 27, 1.0L);
 
   END (erf);
@@ -2334,11 +2334,11 @@ erfc_test (void)
   TEST_f_f (erfc, minus_zero, 1.0);
   TEST_f_f (erfc, nan_value, nan_value);
 
-  TEST_f_f (erfc, 0.7, 0.32219880616258152702L);
+  TEST_f_f (erfc, 0.7L, 0.32219880616258152702L);
 
-  TEST_f_f (erfc, 1.2, 0.089686021770364619762L);
+  TEST_f_f (erfc, 1.2L, 0.089686021770364619762L);
   TEST_f_f (erfc, 2.0, 0.0046777349810472658379L);
-  TEST_f_f (erfc, 4.1, 0.67000276540848983727e-8L);
+  TEST_f_f (erfc, 4.1L, 0.67000276540848983727e-8L);
   TEST_f_f (erfc, 9, 0.41370317465138102381e-36L);
 
   END (erfc);
@@ -2367,7 +2367,7 @@ exp_test (void)
 
   TEST_f_f (exp, 2, M_E2l);
   TEST_f_f (exp, 3, M_E3l);
-  TEST_f_f (exp, 0.7, 2.0137527074704765216L);
+  TEST_f_f (exp, 0.7L, 2.0137527074704765216L);
 
   END (exp);
 }
@@ -2394,7 +2394,7 @@ exp10_test (void)
   TEST_f_f (exp10, -1, 0.1L);
   TEST_f_f (exp10, 1e6, plus_infty);
   TEST_f_f (exp10, -1e6, 0);
-  TEST_f_f (exp10, 0.7, 5.0118723362727228500L);
+  TEST_f_f (exp10, 0.7L, 5.0118723362727228500155418688494574L);
 
   END (exp10);
 }
@@ -2420,7 +2420,7 @@ exp2_test (void)
   TEST_f_f (exp2, -1, 0.5);
   TEST_f_f (exp2, 1e6, plus_infty);
   TEST_f_f (exp2, -1e6, 0);
-  TEST_f_f (exp2, 0.7, 1.6245047927124710452L);
+  TEST_f_f (exp2, 0.7L, 1.6245047927124710452L);
 
   END (exp2);
 }
@@ -2446,7 +2446,7 @@ expm1_test (void)
   TEST_f_f (expm1, nan_value, nan_value);
 
   TEST_f_f (expm1, 1, M_El - 1.0);
-  TEST_f_f (expm1, 0.7, 1.0137527074704765216L);
+  TEST_f_f (expm1, 0.7L, 1.0137527074704765216L);
 
   END (expm1);
 }
@@ -2626,7 +2626,7 @@ static void
 fmod_test (void)
 {
   errno = 0;
-  FUNC(fmod) (6.5, 2.3);
+  FUNC(fmod) (6.5, 2.3L);
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -2655,10 +2655,10 @@ fmod_test (void)
 
   TEST_ff_f (fmod, nan_value, nan_value, nan_value);
 
-  TEST_ff_f (fmod, 6.5, 2.3, 1.9L);
-  TEST_ff_f (fmod, -6.5, 2.3, -1.9L);
-  TEST_ff_f (fmod, 6.5, -2.3, 1.9L);
-  TEST_ff_f (fmod, -6.5, -2.3, -1.9L);
+  TEST_ff_f (fmod, 6.5, 2.3L, 1.9L);
+  TEST_ff_f (fmod, -6.5, 2.3L, -1.9L);
+  TEST_ff_f (fmod, 6.5, -2.3L, 1.9L);
+  TEST_ff_f (fmod, -6.5, -2.3L, -1.9L);
 
   END (fmod);
 }
@@ -2732,7 +2732,7 @@ static void
 hypot_test (void)
 {
   errno = 0;
-  FUNC(hypot) (0.7, 12.4);
+  FUNC(hypot) (0.7L, 12.4L);
   if (errno == ENOSYS)
     /* Function not implemented.  */
     return;
@@ -2752,19 +2752,19 @@ hypot_test (void)
   TEST_ff_f (hypot, nan_value, nan_value, nan_value);
 
   /* hypot (x,y) == hypot (+-x, +-y)  */
-  TEST_ff_f (hypot, 0.7, 12.4, 12.41974234837422060118L);
-  TEST_ff_f (hypot, -0.7, 12.4, 12.41974234837422060118L);
-  TEST_ff_f (hypot, 0.7, -12.4, 12.41974234837422060118L);
-  TEST_ff_f (hypot, -0.7, -12.4, 12.41974234837422060118L);
-  TEST_ff_f (hypot, 12.4, 0.7, 12.41974234837422060118L);
-  TEST_ff_f (hypot, -12.4, 0.7, 12.41974234837422060118L);
-  TEST_ff_f (hypot, 12.4, -0.7, 12.41974234837422060118L);
-  TEST_ff_f (hypot, -12.4, -0.7, 12.41974234837422060118L);
+  TEST_ff_f (hypot, 0.7L, 12.4L, 12.41974234837422060118L);
+  TEST_ff_f (hypot, -0.7L, 12.4L, 12.41974234837422060118L);
+  TEST_ff_f (hypot, 0.7L, -12.4L, 12.41974234837422060118L);
+  TEST_ff_f (hypot, -0.7L, -12.4L, 12.41974234837422060118L);
+  TEST_ff_f (hypot, 12.4L, 0.7L, 12.41974234837422060118L);
+  TEST_ff_f (hypot, -12.4L, 0.7L, 12.41974234837422060118L);
+  TEST_ff_f (hypot, 12.4L, -0.7L, 12.41974234837422060118L);
+  TEST_ff_f (hypot, -12.4L, -0.7L, 12.41974234837422060118L);
 
   /*  hypot (x,0) == fabs (x)  */
   TEST_ff_f (hypot, 0.7L, 0, 0.7L);
   TEST_ff_f (hypot, -0.7L, 0, 0.7L);
-  TEST_ff_f (hypot, -5.7e7L, 0, 5.7e7L);
+  TEST_ff_f (hypot, -5.7e7, 0, 5.7e7L);
 
   TEST_ff_f (hypot, 0.7L, 1.2L, 1.3892443989449804508L);
 
@@ -2837,8 +2837,8 @@ j0_test (void)
   TEST_f_f (j0, plus_infty, 0);
   TEST_f_f (j0, -1.0, 0.76519768655796655145);
   TEST_f_f (j0, 0.0, 1.0);
-  TEST_f_f (j0, 0.1, 0.99750156206604003228);
-  TEST_f_f (j0, 0.7, 0.88120088860740528084);
+  TEST_f_f (j0, 0.1L, 0.99750156206604003228);
+  TEST_f_f (j0, 0.7L, 0.88120088860740528084);
   TEST_f_f (j0, 1.0, 0.76519768655796655145);
   TEST_f_f (j0, 1.5, 0.51182767173591812875);
   TEST_f_f (j0, 2.0, 0.22389077914123566805);
@@ -2867,8 +2867,8 @@ j1_test (void)
 
   TEST_f_f (j1, -1.0, -0.44005058574493351596);
   TEST_f_f (j1, 0.0, 0.0);
-  TEST_f_f (j1, 0.1, 0.049937526036241997556);
-  TEST_f_f (j1, 0.7, 0.32899574154005894785);
+  TEST_f_f (j1, 0.1L, 0.049937526036241997556);
+  TEST_f_f (j1, 0.7L, 0.32899574154005894785);
   TEST_f_f (j1, 1.0, 0.44005058574493351596);
   TEST_f_f (j1, 1.5, 0.55793650791009964199);
   TEST_f_f (j1, 2.0, 0.57672480775687338720);
@@ -2895,8 +2895,8 @@ jn_test (void)
   TEST_ff_f (jn, 0, plus_inf