diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2017-04-13 11:40:24 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2017-04-13 11:40:24 +0300 |
commit | 3e6d7cb2ac0e05aaca43b923cc9e2b408f390d01 (patch) | |
tree | e3d9d87bb0287a5eb87550987360a0b9e8188842 /mpfr.c | |
parent | cb6411df195fc515dd5062a8c368e3422594a71f (diff) | |
download | egawk-3e6d7cb2ac0e05aaca43b923cc9e2b408f390d01.tar.gz egawk-3e6d7cb2ac0e05aaca43b923cc9e2b408f390d01.tar.bz2 egawk-3e6d7cb2ac0e05aaca43b923cc9e2b408f390d01.zip |
Make MPFR division by zero fatal in intdiv.c. Some other cleanups.
Diffstat (limited to 'mpfr.c')
-rw-r--r-- | mpfr.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -103,11 +103,11 @@ cleanup_mpfr(void) /* mpg_node --- allocate a node to store MPFR float or GMP integer */ NODE * -mpg_node(unsigned int tp) +mpg_node(unsigned int flags) { - NODE *r = make_number_node(tp); + NODE *r = make_number_node(flags); - if (tp == MPFN) + if (flags == MPFN) /* Initialize, set precision to the default precision, and value to NaN */ mpfr_init(r->mpg_numbr); else |