diff options
author | Marc Glisse <marc.glisse@inria.fr> | 2012-02-24 11:27:02 +0100 |
---|---|---|
committer | Marc Glisse <marc.glisse@inria.fr> | 2012-02-24 11:27:02 +0100 |
commit | 1e4d320f77a2c0843155201833a2c419ff3bcd1e (patch) | |
tree | d5699afb0c03ef9b07797bfe8ad14140604ea278 /mpq/set_f.c | |
parent | 15cafc39ad37fb3f06cd0e769f855b199288fdf4 (diff) | |
download | gmp-1e4d320f77a2c0843155201833a2c419ff3bcd1e.tar.gz |
Collapse MPZ_REALLOC(x,.) and PTR(x).
Diffstat (limited to 'mpq/set_f.c')
-rw-r--r-- | mpq/set_f.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/mpq/set_f.c b/mpq/set_f.c index b8e64621c..c62b3c63b 100644 --- a/mpq/set_f.c +++ b/mpq/set_f.c @@ -49,8 +49,7 @@ mpq_set_f (mpq_ptr q, mpf_srcptr f) /* radix point is to the right of the limbs, no denominator */ mp_ptr num_ptr; - MPZ_REALLOC (mpq_numref (q), fexp); - num_ptr = PTR(NUM(q)); + num_ptr = MPZ_REALLOC (mpq_numref (q), fexp); MPN_ZERO (num_ptr, fexp - abs_fsize); MPN_COPY (num_ptr + fexp - abs_fsize, fptr, abs_fsize); @@ -65,10 +64,8 @@ mpq_set_f (mpq_ptr q, mpf_srcptr f) mp_size_t den_size; den_size = abs_fsize - fexp; - MPZ_REALLOC (mpq_numref (q), abs_fsize); - MPZ_REALLOC (mpq_denref (q), den_size+1); - num_ptr = PTR(NUM(q)); - den_ptr = PTR(DEN(q)); + num_ptr = MPZ_REALLOC (mpq_numref (q), abs_fsize); + den_ptr = MPZ_REALLOC (mpq_denref (q), den_size+1); if (flow & 1) { |