From adc37d7931ea14e21c9e457b7eb5198630bfd188 Mon Sep 17 00:00:00 2001 From: Ulrich Drepper Date: Mon, 12 Feb 2001 09:30:32 +0000 Subject: [PATCH] Update. * sysdeps/i386/fpu/libm-test-ulps: Adjust for errors in y0l. * math/libm-test.inc (j0_test): Make expected results long double constants. (y0_test): Likewise. --- ChangeLog | 6 ++++++ math/libm-test.inc | 30 +++++++++++++++--------------- sysdeps/i386/fpu/libm-test-ulps | 8 ++++++++ 3 files changed, 29 insertions(+), 15 deletions(-) diff --git a/ChangeLog b/ChangeLog index dc124041dc..80dbd5dc52 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,11 @@ 2001-02-12 Ulrich Drepper + * sysdeps/i386/fpu/libm-test-ulps: Adjust for errors in y0l. + + * math/libm-test.inc (j0_test): Make expected results long double + constants. + (y0_test): Likewise. + * sysdeps/ieee754/ldbl-96/e_j0l.c: New file. Contributed by Stephen L. Moshier . diff --git a/math/libm-test.inc b/math/libm-test.inc index 76f9022f8e..6bbbff520b 100644 --- a/math/libm-test.inc +++ b/math/libm-test.inc @@ -2835,15 +2835,15 @@ j0_test (void) /* j0 is the Bessel function of the first kind of order 0 */ TEST_f_f (j0, nan_value, nan_value); TEST_f_f (j0, plus_infty, 0); - TEST_f_f (j0, -1.0, 0.76519768655796655145); + TEST_f_f (j0, -1.0, 0.76519768655796655145L); TEST_f_f (j0, 0.0, 1.0); - 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); - TEST_f_f (j0, 8.0, 0.17165080713755390609); - TEST_f_f (j0, 10.0, -0.24593576445134833520); + TEST_f_f (j0, 0.1L, 0.99750156206604003228L); + TEST_f_f (j0, 0.7L, 0.88120088860740528084L); + TEST_f_f (j0, 1.0, 0.76519768655796655145L); + TEST_f_f (j0, 1.5, 0.51182767173591812875L); + TEST_f_f (j0, 2.0, 0.22389077914123566805L); + TEST_f_f (j0, 8.0, 0.17165080713755390609L); + TEST_f_f (j0, 10.0, -0.24593576445134833520L); END (j0); } @@ -4015,13 +4015,13 @@ y0_test (void) TEST_f_f (y0, nan_value, nan_value); TEST_f_f (y0, plus_infty, 0); - TEST_f_f (y0, 0.1L, -1.5342386513503668441); - TEST_f_f (y0, 0.7L, -0.19066492933739506743); - TEST_f_f (y0, 1.0, 0.088256964215676957983); - TEST_f_f (y0, 1.5, 0.38244892379775884396); - TEST_f_f (y0, 2.0, 0.51037567264974511960); - TEST_f_f (y0, 8.0, 0.22352148938756622053); - TEST_f_f (y0, 10.0, 0.055671167283599391424); + TEST_f_f (y0, 0.1L, -1.5342386513503668441L); + TEST_f_f (y0, 0.7L, -0.19066492933739506743L); + TEST_f_f (y0, 1.0, 0.088256964215676957983L); + TEST_f_f (y0, 1.5, 0.38244892379775884396L); + TEST_f_f (y0, 2.0, 0.51037567264974511960L); + TEST_f_f (y0, 8.0, 0.22352148938756622053L); + TEST_f_f (y0, 10.0, 0.055671167283599391424L); END (y0); } diff --git a/sysdeps/i386/fpu/libm-test-ulps b/sysdeps/i386/fpu/libm-test-ulps index a56803ba08..a2ffad6e86 100644 --- a/sysdeps/i386/fpu/libm-test-ulps +++ b/sysdeps/i386/fpu/libm-test-ulps @@ -892,6 +892,8 @@ float: 1 ifloat: 1 double: 3 idouble: 3 +ldouble: 2 +ildouble: 2 Test "y0 (1.0) == 0.088256964215676957983": double: 2 float: 1 @@ -910,11 +912,15 @@ float: 1 ifloat: 1 double: 2 idouble: 2 +ldouble: 1 +ildouble: 2 Test "y0 (8.0) == 0.22352148938756622053": float: 1 ifloat: 1 double: 1 idouble: 1 +ldouble: 1 +ildouble: 1 # y1 Test "y1 (0.1) == -6.4589510947020269877": @@ -1481,6 +1487,8 @@ double: 3 float: 1 idouble: 3 ifloat: 1 +ldouble: 2 +ildouble: 2 Function: "y1": double: 3