diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2017-02-17 08:18:51 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2017-02-17 08:18:51 +0200 |
| commit | 4ce031ad3c3d157a425f721688a09a7dde018619 (patch) | |
| tree | 340825da478a70246a71f441ba69b6188c85dd4a /builtin.c | |
| parent | eb8d0c64228657bad4ef2e2fd732eeed937f3af1 (diff) | |
| download | egawk-4ce031ad3c3d157a425f721688a09a7dde018619.tar.gz egawk-4ce031ad3c3d157a425f721688a09a7dde018619.tar.bz2 egawk-4ce031ad3c3d157a425f721688a09a7dde018619.zip | |
Fix typeof on null fields.
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; |