summaryrefslogtreecommitdiff
path: root/tests/tsqr.c
diff options
context:
space:
mode:
authorzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2016-05-30 05:57:51 +0000
committerzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2016-05-30 05:57:51 +0000
commit5ede19526edf011fcf24983cc6f7b91d32a2bead (patch)
tree69a9fcab593017b58707d75dc33f5df8f15c397e /tests/tsqr.c
parentcf11a3eb08d62789a6fdc3347da236c3c389743f (diff)
downloadmpfr-5ede19526edf011fcf24983cc6f7b91d32a2bead.tar.gz
more work on the faithful branch
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/branches/faithful@10385 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tsqr.c')
-rw-r--r--tests/tsqr.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/tsqr.c b/tests/tsqr.c
index 199fa4692..ec585d9ce 100644
--- a/tests/tsqr.c
+++ b/tests/tsqr.c
@@ -73,7 +73,8 @@ check_random (mpfr_prec_t p)
inexact2 = mpfr_sqr (z, x, (mpfr_rnd_t) r);
if (mpfr_cmp (y, z))
error1 ((mpfr_rnd_t) r,p,x,y,z);
- if (inexact_sign (inexact1) != inexact_sign (inexact2))
+ if (inexact_sign (inexact1) != inexact_sign (inexact2) &&
+ r != MPFR_RNDF)
error2 ((mpfr_rnd_t) r,p,x,y,inexact1,inexact2);
}
}