diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2018-01-10 22:14:27 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2018-01-10 22:14:27 +0200 |
| commit | cc8c981c9eaed42e1afd278afac787cd2aeab55f (patch) | |
| tree | 66daeb2dc1049a6112445705f6b92cea55958bd7 /node.c | |
| parent | dd2516767fa58d56684e003f646ef6d611051a64 (diff) | |
| parent | 7d463f19f1fc98a7d4f99e3575c545ca7009d9db (diff) | |
| download | egawk-cc8c981c9eaed42e1afd278afac787cd2aeab55f.tar.gz egawk-cc8c981c9eaed42e1afd278afac787cd2aeab55f.tar.bz2 egawk-cc8c981c9eaed42e1afd278afac787cd2aeab55f.zip | |
Merge branch 'master' into feature/fix-comments
Diffstat (limited to 'node.c')
| -rw-r--r-- | node.c | 11 |
1 files changed, 10 insertions, 1 deletions
@@ -3,7 +3,7 @@ */ /* - * Copyright (C) 1986, 1988, 1989, 1991-2001, 2003-2015, 2017, + * Copyright (C) 1986, 1988, 1989, 1991-2001, 2003-2015, 2017, 2018, * the Free Software Foundation, Inc. * * This file is part of GAWK, the GNU implementation of the @@ -252,6 +252,9 @@ r_format_val(const char *format, int index, NODE *s) if ((s->flags & (MALLOC|STRCUR)) == (MALLOC|STRCUR)) efree(s->stptr); s->stptr = r->stptr; +#ifdef HAVE_MPFR + s->strndmode = MPFR_round_mode; +#endif freenode(r); /* Do not unref(r)! We want to keep s->stptr == r->stpr. */ goto no_malloc; @@ -273,6 +276,9 @@ r_format_val(const char *format, int index, NODE *s) s->flags &= ~(INTIND|NUMBER); s->flags |= STRING; } +#ifdef HAVE_MPFR + s->strndmode = MPFR_round_mode; +#endif } if ((s->flags & (MALLOC|STRCUR)) == (MALLOC|STRCUR)) efree(s->stptr); @@ -377,6 +383,9 @@ make_str_node(const char *s, size_t len, int flags) r->flags = (MALLOC|STRING|STRCUR); r->valref = 1; r->stfmt = STFMT_UNUSED; +#ifdef HAVE_MPFR + r->strndmode = MPFR_round_mode; +#endif r->wstptr = NULL; r->wstlen = 0; |