diff options
author | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2004-01-14 12:42:22 +0000 |
---|---|---|
committer | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2004-01-14 12:42:22 +0000 |
commit | 0a40b14f2ae6f51268df552f999845f23de4a321 (patch) | |
tree | 15f35161f8ad2eee60846eb7af6d23be3e4df5fd /tests/texp2.c | |
parent | 21249c6b35c1ef09485172cb22598a1c78a2d151 (diff) | |
download | mpfr-0a40b14f2ae6f51268df552f999845f23de4a321.tar.gz |
Continue to port tests so that they don't use double.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2621 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/texp2.c')
-rw-r--r-- | tests/texp2.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/texp2.c b/tests/texp2.c index 33674a014..ae1b43ba0 100644 --- a/tests/texp2.c +++ b/tests/texp2.c @@ -1,6 +1,6 @@ /* Test file for mpfr_exp2. -Copyright 2001, 2002, 2003 Free Software Foundation. +Copyright 2001, 2002, 2003, 2004 Free Software Foundation. Adapted from tarctan.c. This file is part of the MPFR Library. @@ -63,7 +63,7 @@ main (int argc, char *argv[]) mpfr_set_str (x, /*-1683977482443233.0 / 2199023255552.0*/ "-7.6578429909351734750089235603809357e2", 10,GMP_RNDN); mpfr_exp2 (y, x, GMP_RNDN); - if (mpfr_get_d1 (y) != 2.991959870867646566478e-231) + if (mpfr_cmp_str1 (y, "2.991959870867646566478e-231")) { printf ("Error for x=-1683977482443233/2^41\n"); exit (1); |