diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2011-05-14 22:37:30 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2011-05-14 22:37:30 +0300 |
commit | 08e3f49c0a98bcbc327a8e7e260386b0b22d3988 (patch) | |
tree | 151331f69c9b5bbc1800da969fb935cc94e3877c /io.c | |
parent | 3750f26244a32a1b077f1a796f26ffd10b2a7b6b (diff) | |
download | egawk-08e3f49c0a98bcbc327a8e7e260386b0b22d3988.tar.gz egawk-08e3f49c0a98bcbc327a8e7e260386b0b22d3988.tar.bz2 egawk-08e3f49c0a98bcbc327a8e7e260386b0b22d3988.zip |
Day one bug fix, z/OS fix, new test.
Diffstat (limited to 'io.c')
-rw-r--r-- | io.c | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -327,10 +327,12 @@ nextfile(IOBUF **curfile, int skipping) for (; i < (long) (ARGC_node->lnode->numbr); i++) { tmp = make_number((AWKNUM) i); - arg = *assoc_lookup(ARGV_node, tmp, FALSE); + (void) force_string(tmp); + arg = in_array(ARGV_node, tmp); unref(tmp); - if (arg->stlen == 0) + if (arg == NULL || arg->stlen == 0) continue; + arg = force_string(arg); arg->stptr[arg->stlen] = '\0'; if (! do_traditional) { unref(ARGIND_node->var_value); |