diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2021-11-18 21:15:59 +0200 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2021-11-18 21:15:59 +0200 |
commit | 0c02a53775a80fe10dcd2b0ae5e857c1f22f8727 (patch) | |
tree | 735ff5700eef7c8ee97e7758fe7de94f958ed90b /gawkapi.c | |
parent | 6892647d502182ca383a4934c20bb0457fc44a51 (diff) | |
parent | dc2613b0af11a8cf97232d55c322d40eda35c224 (diff) | |
download | egawk-0c02a53775a80fe10dcd2b0ae5e857c1f22f8727.tar.gz egawk-0c02a53775a80fe10dcd2b0ae5e857c1f22f8727.tar.bz2 egawk-0c02a53775a80fe10dcd2b0ae5e857c1f22f8727.zip |
Merge branch 'gawk-5.1-stable'
Diffstat (limited to 'gawkapi.c')
-rw-r--r-- | gawkapi.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -173,7 +173,8 @@ awk_value_to_node(const awk_value_t *retval) if (! do_mpfr) fatal(_("awk_value_to_node: not in MPFR mode")); ext_ret_val = make_number_node(MPFN); - tval = mpfr_set(ext_ret_val->mpg_numbr, (mpfr_ptr) retval->num_ptr, ROUND_MODE); + mpfr_init(ext_ret_val->mpg_numbr); + tval = mpfr_set(ext_ret_val->mpg_numbr, (mpfr_srcptr) retval->num_ptr, ROUND_MODE); IEEE_FMT(ext_ret_val->mpg_numbr, tval); #else fatal(_("awk_value_to_node: MPFR not supported")); |