diff options
| author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2000-12-15 16:41:07 +0000 |
|---|---|---|
| committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2000-12-15 16:41:07 +0000 |
| commit | 8f93e232b461adb585ff7cc96c46a018afdcb378 (patch) | |
| tree | cdb4968c74c9185d7c786c319c0d9a339ffd399a /set_prec.c | |
| parent | ae84a54357ab7e180ba80b4cb90885f052ca335d (diff) | |
| download | mpfr-8f93e232b461adb585ff7cc96c46a018afdcb378.tar.gz | |
added error message when memory allocation fails
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@879 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'set_prec.c')
| -rw-r--r-- | set_prec.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/set_prec.c b/set_prec.c index 8b582e74b..4225aa378 100644 --- a/set_prec.c +++ b/set_prec.c @@ -42,8 +42,12 @@ mpfr_set_prec (x, p) xsize = (p - 1)/BITS_PER_MP_LIMB + 1; /* new limb size */ if (xsize > MPFR_ABSSIZE(x)) { - x -> _mp_d = (mp_ptr) (*_mp_reallocate_func) - (x -> _mp_d, MPFR_ABSSIZE(x)*BYTES_PER_MP_LIMB, xsize * BYTES_PER_MP_LIMB); + MPFR_MANT(x) = (mp_ptr) (*_mp_reallocate_func) (MPFR_MANT(x), + MPFR_ABSSIZE(x)*BYTES_PER_MP_LIMB, xsize * BYTES_PER_MP_LIMB); + if (MPFR_MANT(x) == NULL) { + fprintf (stderr, "Error in mpfr_set_prec: no more memory available\n"); + exit (1); + } MPFR_SIZE(x) = xsize; /* new number of allocated limbs */ } |