diff options
| author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2017-11-28 14:41:45 +0000 |
|---|---|---|
| committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2017-11-28 14:41:45 +0000 |
| commit | 0094251ba4bed895e6759663f9a8952373c13b5d (patch) | |
| tree | 0bd3974365ee84d56b92c3b7c4abab9332631641 | |
| parent | 69d9103aa33fe11e8786a821ad0c6fac65f912c2 (diff) | |
| download | mpfr-0094251ba4bed895e6759663f9a8952373c13b5d.tar.gz | |
[src/fpif.c] Improved a test (mpfr_regular_p → !MPFR_IS_SINGULAR).
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@11850 280ebfd0-de03-0410-8827-d642c229c3f4
| -rw-r--r-- | src/fpif.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/fpif.c b/src/fpif.c index 147e484e1..cacc0a0c5 100644 --- a/src/fpif.c +++ b/src/fpif.c @@ -593,7 +593,9 @@ mpfr_fpif_import (mpfr_t x, FILE *fh) if (status != 0) return -1; - if (mpfr_regular_p (x)) + /* Warning! The significand of x is not set yet. Thus use MPFR_IS_SINGULAR + for the test. */ + if (!MPFR_IS_SINGULAR (x)) { used_size = (precision + 7) >> 3; /* ceil(precision/8) */ buffer = (unsigned char*) mpfr_allocate_func (used_size); |