aboutsummaryrefslogtreecommitdiffstats
path: root/int_array.c
diff options
context:
space:
mode:
Diffstat (limited to 'int_array.c')
-rw-r--r--int_array.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/int_array.c b/int_array.c
index 2ab68eeb..992da4a6 100644
--- a/int_array.c
+++ b/int_array.c
@@ -183,8 +183,9 @@ is_integer(NODE *symbol, NODE *subs)
return NULL;
if (len == 1 && *cp != '-') { /* single digit */
subs->numbr = (long) (*cp - '0');
- if ((subs->flags & MAYBE_NUM) != 0) {
- subs->flags &= ~(MAYBE_NUM|STRING);
+ if ((subs->flags & USER_INPUT) != 0) {
+ /* leave USER_INPUT set */
+ subs->flags &= ~STRING;
subs->flags |= NUMBER;
}
subs->flags |= (NUMCUR|NUMINT);
@@ -202,8 +203,9 @@ is_integer(NODE *symbol, NODE *subs)
return NULL;
subs->numbr = l;
- if ((subs->flags & MAYBE_NUM) != 0) {
- subs->flags &= ~(MAYBE_NUM|STRING);
+ if ((subs->flags & USER_INPUT) != 0) {
+ /* leave USER_INPUT set */
+ subs->flags &= ~STRING;
subs->flags |= NUMBER;
}
subs->flags |= NUMCUR;