1999-06-04  Andreas Jaeger  <aj@arthur.rhein-neckar.de>

	* math/libm-test.c (yn_test): Change one delta.
	(jn_test): Likewise.
	(j1_test): Likewise.
	(y0_test): Likewise.
This commit is contained in:
Ulrich Drepper 1999-06-06 12:58:19 +00:00
parent b3864d70e7
commit a582750d70
4 changed files with 20 additions and 13 deletions

View File

@ -1,3 +1,10 @@
1999-06-04 Andreas Jaeger <aj@arthur.rhein-neckar.de>
* math/libm-test.c (yn_test): Change one delta.
(jn_test): Likewise.
(j1_test): Likewise.
(y0_test): Likewise.
1999-06-06 Ulrich Drepper <drepper@cygnus.com> 1999-06-06 Ulrich Drepper <drepper@cygnus.com>
* malloc/malloc.c: Introduce local variable __libc_getpagesize to * malloc/malloc.c: Introduce local variable __libc_getpagesize to

2
FAQ
View File

@ -634,7 +634,7 @@ US.
the libc.so which comes with glibc all I get is a core dump. the libc.so which comes with glibc all I get is a core dump.
{UD} On Linux, gcc sets the dynamic linker to /lib/ld-linux.so.1 unless the {UD} On Linux, gcc sets the dynamic linker to /lib/ld-linux.so.1 unless the
user specifies a -dynamic-linker argument. This is the name of the libc5 user specifies a --dynamic-linker argument. This is the name of the libc5
dynamic linker, which does not work with glibc. dynamic linker, which does not work with glibc.
For casual use of GNU libc you can just specify to the linker For casual use of GNU libc you can just specify to the linker

View File

@ -1656,7 +1656,7 @@ ptmalloc_init __MALLOC_P((void))
/* Initialize the pthreads interface. */ /* Initialize the pthreads interface. */
if (__pthread_initialize != NULL) if (__pthread_initialize != NULL)
__pthread_initialize(); __pthread_initialize();
__libc_getpagesize = __getpagesize(); __libc_pagesize = __getpagesize();
#endif #endif
mutex_init(&main_arena.mutex); mutex_init(&main_arena.mutex);
mutex_init(&list_lock); mutex_init(&list_lock);

View File

@ -5505,7 +5505,7 @@ j0_test (void)
if (errno == ENOSYS) if (errno == ENOSYS)
/* Function not implemented. */ /* Function not implemented. */
return; return;
/* j0 is the Bessel function of the first kind of order 0 */ /* j0 is the Bessel function of the first kind of order 0 */
check_isnan ("j0 (NaN) = NaN", FUNC(j0) (nan_value)); check_isnan ("j0 (NaN) = NaN", FUNC(j0) (nan_value));
check ("j0 (+Inf) = 0", FUNC(j0) (plus_infty), 0); check ("j0 (+Inf) = 0", FUNC(j0) (plus_infty), 0);
@ -5535,7 +5535,7 @@ j1_test (void)
/* j1 is the Bessel function of the first kind of order 1 */ /* j1 is the Bessel function of the first kind of order 1 */
check_isnan ("j1 (NaN) = NaN", FUNC(j1) (nan_value)); check_isnan ("j1 (NaN) = NaN", FUNC(j1) (nan_value));
check ("j1 (+Inf) = 0", FUNC(j1) (plus_infty), 0); check ("j1 (+Inf) = 0", FUNC(j1) (plus_infty), 0);
check ("j1 (-1.0) = -0.44005...", FUNC(j1) (-1.0), -0.44005058574493351596); check ("j1 (-1.0) = -0.44005...", FUNC(j1) (-1.0), -0.44005058574493351596);
check ("j1 (0) = 0", FUNC(j1) (0.0), 0.0); check ("j1 (0) = 0", FUNC(j1) (0.0), 0.0);
check ("j1 (0.1) = 0.049937...", FUNC(j1) (0.1), 0.049937526036241997556); check ("j1 (0.1) = 0.049937...", FUNC(j1) (0.1), 0.049937526036241997556);
@ -5547,7 +5547,7 @@ j1_test (void)
check_eps ("j1 (8.0) = 0.23463...", FUNC(j1) (8.0), 0.23463634685391462438, check_eps ("j1 (8.0) = 0.23463...", FUNC(j1) (8.0), 0.23463634685391462438,
CHOOSE(0, 0, 1.5e-8)); CHOOSE(0, 0, 1.5e-8));
check_eps ("j1 (10.0) = 0.04347...", FUNC(j1) (10.0), 0.043472746168861436670, check_eps ("j1 (10.0) = 0.04347...", FUNC(j1) (10.0), 0.043472746168861436670,
CHOOSE(0, 7e-18, 3.8e-9)); CHOOSE(0, 2e-17, 3.8e-9));
} }
static void static void
@ -5580,7 +5580,7 @@ jn_test (void)
/* jn (1, x) == j1 (x) */ /* jn (1, x) == j1 (x) */
check_isnan ("jn (1, NaN) = NaN", FUNC(jn) (1, nan_value)); check_isnan ("jn (1, NaN) = NaN", FUNC(jn) (1, nan_value));
check ("jn (1, +Inf) = 0", FUNC(jn) (1, plus_infty), 0); check ("jn (1, +Inf) = 0", FUNC(jn) (1, plus_infty), 0);
check ("jn (1, -1.0) = -0.44005...", FUNC(jn) (1, -1.0), -0.44005058574493351596); check ("jn (1, -1.0) = -0.44005...", FUNC(jn) (1, -1.0), -0.44005058574493351596);
check ("jn (1, 0.0) = 0", FUNC(jn) (1, 0.0), 0.0); check ("jn (1, 0.0) = 0", FUNC(jn) (1, 0.0), 0.0);
check ("jn (1, 0.1) = 0.049937...", FUNC(jn) (1, 0.1), 0.049937526036241997556); check ("jn (1, 0.1) = 0.049937...", FUNC(jn) (1, 0.1), 0.049937526036241997556);
@ -5592,12 +5592,12 @@ jn_test (void)
check_eps ("jn (1, 8.0) = 0.23463...", FUNC(jn) (1, 8.0), 0.23463634685391462438, check_eps ("jn (1, 8.0) = 0.23463...", FUNC(jn) (1, 8.0), 0.23463634685391462438,
CHOOSE(0, 0, 1.5e-8)); CHOOSE(0, 0, 1.5e-8));
check_eps ("jn (1, 10.0) = 0.04347...", FUNC(jn) (1, 10.0), 0.043472746168861436670, check_eps ("jn (1, 10.0) = 0.04347...", FUNC(jn) (1, 10.0), 0.043472746168861436670,
CHOOSE(0, 7e-18, 3.8e-9)); CHOOSE(0, 2e-17, 3.8e-9));
/* jn (3, x) */ /* jn (3, x) */
check_isnan ("jn (3, NaN) = NaN", FUNC(jn) (3, nan_value)); check_isnan ("jn (3, NaN) = NaN", FUNC(jn) (3, nan_value));
check ("jn (3, +Inf) = 0", FUNC(jn) (3, plus_infty), 0); check ("jn (3, +Inf) = 0", FUNC(jn) (3, plus_infty), 0);
check ("jn (3, -1.0) = -0.01956...", FUNC(jn) (3, -1.0), -0.019563353982668405919); check ("jn (3, -1.0) = -0.01956...", FUNC(jn) (3, -1.0), -0.019563353982668405919);
check ("jn (3, 0.0) = 0", FUNC(jn) (3, 0.0), 0.0); check ("jn (3, 0.0) = 0", FUNC(jn) (3, 0.0), 0.0);
check_eps ("jn (3, 0.1) = 2.082...*10^-6", FUNC(jn) (3, 0.1), 0.000020820315754756261429, check_eps ("jn (3, 0.1) = 2.082...*10^-6", FUNC(jn) (3, 0.1), 0.000020820315754756261429,
@ -5613,7 +5613,7 @@ jn_test (void)
/* jn (10, x) */ /* jn (10, x) */
check_isnan ("jn (10, NaN) = NaN", FUNC(jn) (10, nan_value)); check_isnan ("jn (10, NaN) = NaN", FUNC(jn) (10, nan_value));
check ("jn (10, +Inf) = 0", FUNC(jn) (10, plus_infty), 0); check ("jn (10, +Inf) = 0", FUNC(jn) (10, plus_infty), 0);
check_eps ("jn (10, -1.0) = 2.6306...*10^-10", FUNC(jn) (10, -1.0), 0.26306151236874532070e-9, check_eps ("jn (10, -1.0) = 2.6306...*10^-10", FUNC(jn) (10, -1.0), 0.26306151236874532070e-9,
CHOOSE(0, 0, 3e-17)); CHOOSE(0, 0, 3e-17));
check ("jn (10, 0) = 0", FUNC(jn) (10, 0.0), 0.0); check ("jn (10, 0) = 0", FUNC(jn) (10, 0.0), 0.0);
@ -5657,7 +5657,7 @@ y0_test (void)
check_eps ("y0 (8.0) = 0.22352...", FUNC(y0) (8.0), 0.22352148938756622053, check_eps ("y0 (8.0) = 0.22352...", FUNC(y0) (8.0), 0.22352148938756622053,
CHOOSE(0, 3e-17, 1.5e-8)); CHOOSE(0, 3e-17, 1.5e-8));
check_eps ("y0 (10.0) = 0.05567...", FUNC(y0) (10.0), 0.055671167283599391424, check_eps ("y0 (10.0) = 0.05567...", FUNC(y0) (10.0), 0.055671167283599391424,
CHOOSE(0, 0, 3.8e-9)); CHOOSE(0, 2e-17, 3.8e-9));
} }
@ -5721,7 +5721,7 @@ yn_test (void)
check_eps ("yn (0, 8.0) = 0.22352...", FUNC(yn) (0, 8.0), 0.22352148938756622053, check_eps ("yn (0, 8.0) = 0.22352...", FUNC(yn) (0, 8.0), 0.22352148938756622053,
CHOOSE(0, 3e-17, 1.5e-8)); CHOOSE(0, 3e-17, 1.5e-8));
check_eps ("yn (0, 10.0) = 0.05567...", FUNC(yn) (0, 10.0), 0.055671167283599391424, check_eps ("yn (0, 10.0) = 0.05567...", FUNC(yn) (0, 10.0), 0.055671167283599391424,
CHOOSE(0, 0, 3.8e-8)); CHOOSE(0, 2e-17, 3.8e-8));
/* yn (1, x) == y1 (x) */ /* yn (1, x) == y1 (x) */
check_isinfn ("yn (1, -1.0) = -inf", FUNC(yn) (1, -1.0)); check_isinfn ("yn (1, -1.0) = -inf", FUNC(yn) (1, -1.0));
@ -5771,7 +5771,7 @@ yn_test (void)
CHOOSE(0, 3e-11, 8e-3)); CHOOSE(0, 3e-11, 8e-3));
check_eps ("yn (10, 10.0) = -0.35981...", FUNC(yn) (10, 10.0), -0.35981415218340272205, check_eps ("yn (10, 10.0) = -0.35981...", FUNC(yn) (10, 10.0), -0.35981415218340272205,
CHOOSE(0, 6e-17, 3e-8)); CHOOSE(0, 6e-17, 3e-8));
} }
@ -6279,7 +6279,7 @@ main (int argc, char *argv[])
y0_test (); y0_test ();
y1_test (); y1_test ();
yn_test (); yn_test ();
/* special tests */ /* special tests */
identities (); identities ();
inverse_functions (); inverse_functions ();