aboutsummaryrefslogtreecommitdiffstats
path: root/mpfr.c
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2015-08-25 20:30:42 +0300
committerArnold D. Robbins <arnold@skeeve.com>2015-08-25 20:30:42 +0300
commitcd2504da556b8bb61b56a34727ef4ce5195ff9a0 (patch)
treed3c2831436c33756735214b942a8981b6da2ba5e /mpfr.c
parent76406567b762f58129d49b5a9ec4e22cf15499f2 (diff)
parent243b097279a89d456fda4a400412482d70b3665c (diff)
downloadegawk-cd2504da556b8bb61b56a34727ef4ce5195ff9a0.tar.gz
egawk-cd2504da556b8bb61b56a34727ef4ce5195ff9a0.tar.bz2
egawk-cd2504da556b8bb61b56a34727ef4ce5195ff9a0.zip
Merge branch 'gawk-4.1-stable' into feature/zOS-try2
Diffstat (limited to 'mpfr.c')
-rw-r--r--mpfr.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/mpfr.c b/mpfr.c
index a89b2bc6..4e4e12dc 100644
--- a/mpfr.c
+++ b/mpfr.c
@@ -347,7 +347,7 @@ mpg_force_number(NODE *n)
return n;
if ((n->flags & MAYBE_NUM) != 0) {
- n->flags &= ~MAYBE_NUM;
+ n->flags &= ~(MAYBE_NUM|STRING);
newflags = NUMBER;
}
@@ -525,7 +525,7 @@ set_PREC()
if ((val->flags & MAYBE_NUM) != 0)
force_number(val);
- if ((val->flags & (STRING|NUMBER)) == STRING) {
+ if ((val->flags & STRCUR) != 0) {
int i, j;
/* emulate IEEE-754 binary format */