diff options
| author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2001-09-06 15:59:15 +0000 |
|---|---|---|
| committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2001-09-06 15:59:15 +0000 |
| commit | 240607abecb0cb1373388d9c9dfcac577d8fcd40 (patch) | |
| tree | 71c5b60c883a7a1c9a7f5af005bc1e69068230cd /exceptions.c | |
| parent | 46ce3975f1890042d3f9382fd405247050bf6e36 (diff) | |
| download | mpfr-240607abecb0cb1373388d9c9dfcac577d8fcd40.tar.gz | |
Fix: flags set in mpfr_set_{under,over}flow().
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@1167 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'exceptions.c')
| -rw-r--r-- | exceptions.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/exceptions.c b/exceptions.c index 0cf22b45d..b04a7dddc 100644 --- a/exceptions.c +++ b/exceptions.c @@ -205,6 +205,7 @@ mpfr_set_underflow () MPFR_SET_ZERO(x); } if (MPFR_SIGN(x) != sign) { MPFR_CHANGE_SIGN(x); } + __mpfr_flags |= MPFR_FLAGS_UNDERFLOW; } #undef mpfr_set_overflow @@ -233,4 +234,5 @@ mpfr_set_overflow () MPFR_SET_INF(x); } if (MPFR_SIGN(x) != sign) { MPFR_CHANGE_SIGN(x); } + __mpfr_flags |= MPFR_FLAGS_OVERFLOW; } |