summaryrefslogtreecommitdiff
path: root/tests/tcmp.c
diff options
context:
space:
mode:
authorzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2003-01-16 16:01:55 +0000
committerzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2003-01-16 16:01:55 +0000
commit53e4fc7c14c9c4b9b3be6b941d853ac1fcc7f81a (patch)
tree6ca0f6baf11496ffc528a474687f4326c00e9796 /tests/tcmp.c
parent3d3b3c4428015d063a0b8b5b1519588ab37920d1 (diff)
downloadmpfr-53e4fc7c14c9c4b9b3be6b941d853ac1fcc7f81a.tar.gz
replaced isnan() by Isnan()
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2180 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tcmp.c')
-rw-r--r--tests/tcmp.c31
1 files changed, 19 insertions, 12 deletions
diff --git a/tests/tcmp.c b/tests/tcmp.c
index e60fe18ad..e16b862ed 100644
--- a/tests/tcmp.c
+++ b/tests/tcmp.c
@@ -161,20 +161,27 @@ main (void)
exit (1);
}
- for (i=0;i<1000000;) { x=drand(); y=drand();
- if (!isnan(x) && !isnan(y)) {
- i++;
- mpfr_set_d(xx, x, 0);
- mpfr_set_d(yy, y, 0);
- c = mpfr_cmp(xx,yy);
- if ((c>0 && x<=y) || (c==0 && x!=y) || (c<0 && x>=y)) {
- printf("Error in mpfr_cmp with x=%1.20e, y=%1.20e mpfr_cmp(x,y)=%d\n",
- x,y,c); exit(1);
- }
+ for (i=0; i<1000000; )
+ {
+ x = drand();
+ y = drand();
+ if (!Isnan(x) && !Isnan(y))
+ {
+ i++;
+ mpfr_set_d (xx, x, 0);
+ mpfr_set_d (yy, y, 0);
+ c = mpfr_cmp (xx,yy);
+ if ((c>0 && x<=y) || (c==0 && x!=y) || (c<0 && x>=y))
+ {
+ printf ("Error in mpfr_cmp with x=%1.20e, y=%1.20e mpfr_cmp(x,y)=%d\n",
+ x, y, c);
+ exit (1);
+ }
+ }
}
- }
- mpfr_clear(xx); mpfr_clear(yy);
+ mpfr_clear (xx);
+ mpfr_clear (yy);
tests_end_mpfr ();
return 0;