aboutsummaryrefslogtreecommitdiffstats
path: root/gawkapi.c
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2012-11-14 21:37:47 +0200
committerArnold D. Robbins <arnold@skeeve.com>2012-11-14 21:37:47 +0200
commitc9e416d0703fc11828a1d175002805b326029735 (patch)
tree446338ff944ffd2ba76860c3cd9c70af9b241721 /gawkapi.c
parentad772284fd932cc884431e71487917ba42aa2b30 (diff)
downloadegawk-c9e416d0703fc11828a1d175002805b326029735.tar.gz
egawk-c9e416d0703fc11828a1d175002805b326029735.tar.bz2
egawk-c9e416d0703fc11828a1d175002805b326029735.zip
Minor cleanup in calls to mpfr routines.
Diffstat (limited to 'gawkapi.c')
-rw-r--r--gawkapi.c8
1 files changed, 2 insertions, 6 deletions
diff --git a/gawkapi.c b/gawkapi.c
index c9b2aced..ba3fc508 100644
--- a/gawkapi.c
+++ b/gawkapi.c
@@ -681,12 +681,8 @@ api_sym_update_scalar(awk_ext_id_t id,
/* r_unref: */
if ((r->flags & (MALLOC|STRCUR)) == (MALLOC|STRCUR))
efree(r->stptr);
-#ifdef HAVE_MPFR
- if (is_mpg_float(r))
- mpfr_clear(r->mpg_numbr);
- else if (is_mpg_integer(r))
- mpz_clear(r->mpg_i);
-#endif
+
+ mpfr_unset(r);
free_wstr(r);
/* make_str_node(s, l, ALREADY_MALLOCED): */