diff options
author | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2003-11-21 15:27:35 +0000 |
---|---|---|
committer | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2003-11-21 15:27:35 +0000 |
commit | 41d7b44241b63a451c3e664bdd9a640a4c255291 (patch) | |
tree | 6a82613a3cf86ab03825e93e2987ad51e8ab58a6 /tests/ttrunc.c | |
parent | 1cd11b42766c57e2118aac4ffe5219fac353904d (diff) | |
download | mpfr-41d7b44241b63a451c3e664bdd9a640a4c255291.tar.gz |
+ Add new internal function: mpfr_check.
+ Add the corresponding test file.
+ Translate mpfr_set_d to mpfr_set_str / mpfr_set_ui in the tests for portability reasons.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2562 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/ttrunc.c')
-rw-r--r-- | tests/ttrunc.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/ttrunc.c b/tests/ttrunc.c index dedaa36de..7d5010adc 100644 --- a/tests/ttrunc.c +++ b/tests/ttrunc.c @@ -43,7 +43,7 @@ main (void) mpfr_init2(z2, SIZEX); mpfr_init2(t2, SIZEX); - mpfr_set_d(x, 0.5, GMP_RNDN); + mpfr_set_str (x, "0.5", 10, GMP_RNDN); mpfr_ceil(y, x); if (mpfr_get_d1 (y) != 1.0) { @@ -52,7 +52,7 @@ main (void) exit (1); } - mpfr_set_d(x, 0.0, GMP_RNDN); + mpfr_set_ui (x, 0, GMP_RNDN); mpfr_ceil(y, x); if (mpfr_get_d1 (y) != 0.0) { @@ -61,7 +61,7 @@ main (void) exit (1); } - mpfr_set_d(x, 1.0, GMP_RNDN); + mpfr_set_ui (x, 1, GMP_RNDN); mpfr_ceil(y, x); if (mpfr_get_d1 (y) != 1.0) { |