From 05b46ea57349880125de275af26c58d1f0304e96 Mon Sep 17 00:00:00 2001 From: zimmerma Date: Fri, 25 Jun 1999 13:01:20 +0000 Subject: added pointer to exponent, removed test with sprintf git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@185 280ebfd0-de03-0410-8827-d642c229c3f4 --- tests/tget_str.c | 13 ++----------- 1 file changed, 2 insertions(+), 11 deletions(-) (limited to 'tests/tget_str.c') diff --git a/tests/tget_str.c b/tests/tget_str.c index 676cb5cb0..10d9f2d26 100644 --- a/tests/tget_str.c +++ b/tests/tget_str.c @@ -31,24 +31,15 @@ double drand() check(d, rnd) double d; unsigned char rnd; { - mpfr_t x; char *str, str2[30]; int l, l2; + mpfr_t x; char *str, str2[30]; int l, l2; mp_exp_t e; mpfr_init2(x, 53); mpfr_set_d(x, d, rnd); - str = mpfr_get_str(NULL, NULL, 10, 5, x, rnd); + str = mpfr_get_str(NULL, &e, 10, 5, x, rnd); mpfr_set_machine_rnd_mode(rnd); sprintf(str2, "%1.4e", d); l2 = strlen(str2); l = strlen(str); - if (l!=l2) printf("l=%d l2=%d\n",l,l2); - if (str2[l2-3]=='-' && str2[l2-2]=='0' && str2[l2-1]=='0') - str2[l2-3]='+'; /* rule for sign of exponent 0 ? */ - if (strcmp(str, str2)) { - printf("Error in mpfr_get_str for d=%s=",str2); - print_double(d); - printf("\ngot %s\n", str); - exit(1); - } mpfr_clear(x); free(str); } -- cgit v1.2.1