diff options
| author | john haque <j.eh@mchsi.com> | 2012-03-07 07:35:18 -0600 |
|---|---|---|
| committer | john haque <j.eh@mchsi.com> | 2012-03-07 07:35:18 -0600 |
| commit | b5431a4825e325c61f4043e4d25e47d7891c228c (patch) | |
| tree | 506dd7e7636f292b24e6bc81a81678762b9bf3e6 /awkgram.y | |
| parent | 473623f186c3699c8886ccdd8a2afb7f4fe7a07e (diff) | |
| download | egawk-b5431a4825e325c61f4043e4d25e47d7891c228c.tar.gz egawk-b5431a4825e325c61f4043e4d25e47d7891c228c.tar.bz2 egawk-b5431a4825e325c61f4043e4d25e47d7891c228c.zip | |
Bug fixes and tests for MPFR.
Diffstat (limited to 'awkgram.y')
| -rw-r--r-- | awkgram.y | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1909,7 +1909,7 @@ negate_num(NODE *n) if (n->flags & MPFN) { int tval; tval = mpfr_setsign(n->mpg_numbr, n->mpg_numbr, TRUE, RND_MODE); - SUBNORMALIZE(n->mpg_numbr, tval); + IEEE_FMT(n->mpg_numbr, tval); } else #endif n->numbr = -n->numbr; @@ -3389,7 +3389,7 @@ retry: r = mpg_node(); tval = mpfr_strtofr(r->mpg_numbr, tokstart, NULL, base, RND_MODE); errno = 0; - SUBNORMALIZE(r->mpg_numbr, tval); + IEEE_FMT(r->mpg_numbr, tval); yylval->memory = r; return lasttok = YNUMBER; } |