diff options
author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2016-07-06 10:30:13 +0000 |
---|---|---|
committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2016-07-06 10:30:13 +0000 |
commit | b4df1c995249d6e5efb25f4fdb5e4c5220e36046 (patch) | |
tree | 8de821446d924b45f55ed9426125f4425fe3b707 /tests/tadd1sp.c | |
parent | a59dc9a549a0f9aff5cb009e2ea68cd67c9e23fc (diff) | |
download | mpfr-b4df1c995249d6e5efb25f4fdb5e4c5220e36046.tar.gz |
[tests/tadd1sp.c] In check_random, check the flags too.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@10571 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tadd1sp.c')
-rw-r--r-- | tests/tadd1sp.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/tadd1sp.c b/tests/tadd1sp.c index b365b472c..ef06bfe5c 100644 --- a/tests/tadd1sp.c +++ b/tests/tadd1sp.c @@ -127,12 +127,19 @@ check_random (mpfr_prec_t p) if (MPFR_IS_PURE_FP(b) && MPFR_IS_PURE_FP(c)) for (r = 0 ; r < MPFR_RND_MAX ; r++) { + mpfr_flags_t flags1, flags2; + + mpfr_clear_flags (); inexact1 = mpfr_add1 (a1, b, c, (mpfr_rnd_t) r); + flags1 = __gmpfr_flags; + mpfr_clear_flags (); inexact2 = mpfr_add1sp (a2, b, c, (mpfr_rnd_t) r); + flags2 = __gmpfr_flags; if (! mpfr_equal_p (a1, a2)) STD_ERROR; if (inexact1 != inexact2) STD_ERROR2; + MPFR_ASSERTN (flags1 == flags2); } } } |