diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-16 05:41:26 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-16 05:41:26 +0300 |
| commit | 448068f27693a7b544dfbcd71980d7473ac12edb (patch) | |
| tree | fff9cfb60b421e4c9110112c8f7c66453d176af1 /int_array.c | |
| parent | 094a71779f3b35f67c8db363ad4908000d4f391e (diff) | |
| parent | ed6a8b0cbdfd4b2231b89bfa420147a88f7312cf (diff) | |
| download | egawk-448068f27693a7b544dfbcd71980d7473ac12edb.tar.gz egawk-448068f27693a7b544dfbcd71980d7473ac12edb.tar.bz2 egawk-448068f27693a7b544dfbcd71980d7473ac12edb.zip | |
Merge branch 'master' into feature/nocopy
Diffstat (limited to 'int_array.c')
| -rw-r--r-- | int_array.c | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/int_array.c b/int_array.c index e52bb40e..9055515f 100644 --- a/int_array.c +++ b/int_array.c @@ -125,28 +125,6 @@ is_integer(NODE *symbol, NODE *subs) if (subs == Nnull_string || do_mpfr) return NULL; - /* - * Protect against MAYBE_NUM values where the string may not regenerate - * correctly. There could be white space and/or a non-decimal value. - * If stfmt is not STFMT_UNUSED, it means that the string value was - * generated using CONVFMT or OFMT, so there is no info there. - */ - if ((subs->flags & STRCUR) != 0 && subs->stfmt == STFMT_UNUSED) { - char *cp = subs->stptr; - - if ( subs->stlen == 0 - || cp[0] == '0' - || isspace((unsigned char) cp[0]) - || isspace((unsigned char) cp[subs->stlen - 1]) - || ( subs->stlen >= 2 - && (cp[0] == '-' || cp[0] == '+') - && cp[1] == '0')) - return NULL; - } - - if ((subs->flags & NUMINT) != 0) - return & success_node; - #ifdef CHECK_INTEGER_USING_FORCE_NUMBER /* * This approach is much simpler, because we remove all of the strtol |