diff options
| author | forsyth <forsyth@vitanuova.com> | 2013-03-12 15:09:37 +0000 |
|---|---|---|
| committer | forsyth <forsyth@vitanuova.com> | 2013-03-12 15:09:37 +0000 |
| commit | 35d297e4cdffea9f5d876142dcc5cd9b59d66622 (patch) | |
| tree | 1d921cc25aec227eedb21d8293f57121e2a0d17e /utils/awk/run.c | |
| parent | bd2d0217cb2b3fd15623144ddba5666769817f8f (diff) | |
20121210-1509
Diffstat (limited to 'utils/awk/run.c')
| -rw-r--r-- | utils/awk/run.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/utils/awk/run.c b/utils/awk/run.c index a6cbb406..7c2740d2 100644 --- a/utils/awk/run.c +++ b/utils/awk/run.c @@ -1209,7 +1209,10 @@ Cell *split(Node **a, int nnn) /* split(a[0], a[1], a[2]); a[3] is type */ FATAL("illegal type of split"); sep = *fs; ap = execute(a[1]); /* array name */ + n = y->tval; + y->tval |= DONTFREE; /* split(a[x], a); */ freesymtab(ap); + y->tval = n; dprintf( ("split: s=|%s|, a=%s, sep=|%s|\n", s, ap->nval, fs) ); ap->tval &= ~STR; ap->tval |= ARR; |