diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-05 21:39:40 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-05 21:39:40 +0300 |
commit | 6f919b67d12616168c5e1bbfca509359fed9143d (patch) | |
tree | 77181c0a49684627ab769d2ea0f7844b191471f8 /node.c | |
parent | 44a927ce8044c599510580adb55c6fa52ecc8052 (diff) | |
parent | 177df586e992824f80bf81a1b878c7a4076caedd (diff) | |
download | egawk-6f919b67d12616168c5e1bbfca509359fed9143d.tar.gz egawk-6f919b67d12616168c5e1bbfca509359fed9143d.tar.bz2 egawk-6f919b67d12616168c5e1bbfca509359fed9143d.zip |
Merge branch 'gawk-5.1-stable'
Diffstat (limited to 'node.c')
-rw-r--r-- | node.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -316,11 +316,13 @@ r_dupnode(NODE *n) r = mpg_integer(); 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(); 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); @@ -343,6 +345,7 @@ r_dupnode(NODE *n) emalloc(r->stptr, char *, n->stlen + 1, "r_dupnode"); memcpy(r->stptr, n->stptr, n->stlen); r->stptr[n->stlen] = '\0'; + r->stlen = n->stlen; if ((n->flags & WSTRCUR) != 0) { r->wstlen = n->wstlen; emalloc(r->wstptr, wchar_t *, sizeof(wchar_t) * (n->wstlen + 1), "r_dupnode"); |