diff options
author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2001-10-25 15:06:12 +0000 |
---|---|---|
committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2001-10-25 15:06:12 +0000 |
commit | f115df80038846f24d4d3e07337a3990b014685e (patch) | |
tree | 39381ef0eed51e210c12504aceb80589f6d6025d /tests/tcmp.c | |
parent | e529ae9d408e3dc44b64aed574c8a34294f443b2 (diff) | |
download | mpfr-f115df80038846f24d4d3e07337a3990b014685e.tar.gz |
added one test
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@1371 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tcmp.c')
-rw-r--r-- | tests/tcmp.c | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/tests/tcmp.c b/tests/tcmp.c index 47624b3e4..d8bb7fad3 100644 --- a/tests/tcmp.c +++ b/tests/tcmp.c @@ -37,7 +37,21 @@ main (void) mpfr_t xx, yy; int i, c; - mpfr_init2(xx, 65); mpfr_init2(yy, 65); + mpfr_init (xx); + mpfr_init (yy); + + mpfr_set_prec (xx, 2); + mpfr_set_prec (yy, 2); + mpfr_set_str_raw(xx, "-0.10E0"); + mpfr_set_str_raw(yy, "-0.10E0"); + if (mpfr_cmp (xx, yy)) + { + fprintf (stderr, "mpfr_cmp (xx, yy) returns non-zero for prec=2\n"); + exit (1); + } + + mpfr_set_prec (xx, 65); + mpfr_set_prec (yy, 65); mpfr_set_str_raw(xx, "0.10011010101000110101010000000011001001001110001011101011111011101E623"); mpfr_set_str_raw(yy, "0.10011010101000110101010000000011001001001110001011101011111011100E623"); if (mpfr_cmp2(xx,yy)!=64) { printf("Error (1) in mpfr_cmp\n"); exit(1); } |