diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2017-02-17 08:19:35 +0200 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2017-02-17 08:19:35 +0200 |
commit | 81d1407331ba872f18d47f16de8339c510ed1008 (patch) | |
tree | 2e89246b229eb7fde813409d21fdb199da0edadc /builtin.c | |
parent | 512c96f284f5179b895ccc9c24b22d12ccc1b0f8 (diff) | |
parent | 4ce031ad3c3d157a425f721688a09a7dde018619 (diff) | |
download | egawk-81d1407331ba872f18d47f16de8339c510ed1008.tar.gz egawk-81d1407331ba872f18d47f16de8339c510ed1008.tar.bz2 egawk-81d1407331ba872f18d47f16de8339c510ed1008.zip |
Merge branch 'master' into feature/api-mpfr
Diffstat (limited to 'builtin.c')
-rw-r--r-- | builtin.c | 15 |
1 files changed, 9 insertions, 6 deletions
@@ -3977,7 +3977,7 @@ NODE * do_typeof(int nargs) { NODE *arg; - char *res = "unknown"; + char *res = NULL; bool deref = true; arg = POP(); @@ -3989,9 +3989,6 @@ do_typeof(int nargs) break; case Node_val: switch (fixtype(arg)->flags & (STRING|NUMBER|USER_INPUT|REGEX)) { - case STRING: - res = "string"; - break; case NUMBER: res = "number"; break; @@ -4001,14 +3998,20 @@ do_typeof(int nargs) case REGEX: res = "regexp"; break; + case STRING: + res = "string"; + // fall through case NUMBER|STRING: - if (arg == Nnull_string) { + if (arg == Nnull_string || (arg->flags & NULL_FIELD) != 0) { res = "unassigned"; break; } /* fall through */ default: - warning(_("typeof detected invalid flags combination `%s'; please file a bug report."), flags2str(arg->flags)); + if (res == NULL) { + warning(_("typeof detected invalid flags combination `%s'; please file a bug report."), flags2str(arg->flags)); + res = "unknown"; + } break; } break; |