diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-15 20:31:09 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-15 20:31:09 +0300 |
| commit | 654019bde25f87c7954641610298299a68d267e4 (patch) | |
| tree | 0dfe321da764c6f4763cb0dcc437033e335e9af4 /gawkapi.c | |
| parent | 20cd6406b8a5c30d17cd78da4fda4ab94755df7e (diff) | |
| parent | 7c68a667125ffc144ba76a52e67b019b49ba60ac (diff) | |
| download | egawk-654019bde25f87c7954641610298299a68d267e4.tar.gz egawk-654019bde25f87c7954641610298299a68d267e4.tar.bz2 egawk-654019bde25f87c7954641610298299a68d267e4.zip | |
Merge branch 'gawk-5.1-stable'
Diffstat (limited to 'gawkapi.c')
| -rw-r--r-- | gawkapi.c | 13 |
1 files changed, 3 insertions, 10 deletions
@@ -25,14 +25,6 @@ #include "awk.h" -#ifdef HAVE_MPFR -#define getmpfr(n) getblock(n, BLOCK_MPFR, mpfr_ptr) -#define freempfr(n) freeblock(n, BLOCK_MPFR) - -#define getmpz(n) getblock(n, BLOCK_MPZ, mpz_ptr) -#define freempz(n) freeblock(n, BLOCK_MPZ) -#endif - /* Declare some globals used by api_get_file: */ extern IOBUF *curfile; extern INSTRUCTION *main_beginfile; @@ -1310,7 +1302,7 @@ api_get_mpfr(awk_ext_id_t id) { #ifdef HAVE_MPFR mpfr_ptr p; - getmpfr(p); + emalloc(p, mpfr_ptr, sizeof(mpfr_t), "api_get_mpfr"); mpfr_init(p); return p; #else @@ -1326,7 +1318,8 @@ api_get_mpz(awk_ext_id_t id) { #ifdef HAVE_MPFR mpz_ptr p; - getmpz(p); + emalloc(p, mpz_ptr, sizeof (mpz_t), "api_get_mpz"); + mpz_init(p); return p; #else |