diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-07 17:47:32 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-07 17:47:32 +0300 |
| commit | 328708c8205cbd211ca1523d6f56bd64fd1389f9 (patch) | |
| tree | 4720a8263e7d053a8bd02c39e8977820ab5245d8 /node.c | |
| parent | 6f919b67d12616168c5e1bbfca509359fed9143d (diff) | |
| parent | 54483c688b659b96cc930000444d5b34ee11d11c (diff) | |
| download | egawk-328708c8205cbd211ca1523d6f56bd64fd1389f9.tar.gz egawk-328708c8205cbd211ca1523d6f56bd64fd1389f9.tar.bz2 egawk-328708c8205cbd211ca1523d6f56bd64fd1389f9.zip | |
Merge branch 'gawk-5.1-stable'
Diffstat (limited to 'node.c')
| -rw-r--r-- | node.c | 15 |
1 files changed, 4 insertions, 11 deletions
@@ -310,24 +310,17 @@ r_dupnode(NODE *n) return n; } #endif + getnode(r); + *r = *n; #ifdef HAVE_MPFR if ((n->flags & MPZN) != 0) { - r = mpg_integer(); + mpz_init(r->mpg_i); mpz_set(r->mpg_i, n->mpg_i); - r->flags = n->flags; - r->strndmode = MPFR_round_mode; } else if ((n->flags & MPFN) != 0) { - r = mpg_float(); + mpfr_init(r->mpg_numbr); int tval = mpfr_set(r->mpg_numbr, n->mpg_numbr, ROUND_MODE); IEEE_FMT(r->mpg_numbr, tval); - r->flags = n->flags; - r->strndmode = MPFR_round_mode; - } else { -#endif - getnode(r); - *r = *n; -#ifdef HAVE_MPFR } #endif |