aboutsummaryrefslogtreecommitdiff
path: root/run.c
diff options
context:
space:
mode:
Diffstat (limited to 'run.c')
-rwxr-xr-x[-rw-r--r--]run.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/run.c b/run.c
index 2b25dda..556fe7d 100644..100755
--- a/run.c
+++ b/run.c
@@ -1454,6 +1454,7 @@ 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 */
+/* BUG 7/26/22: this appears not to reset array: see C1/asplit */
freesymtab(ap);
DPRINTF("split: s=|%s|, a=%s, sep=|%s|\n", s, NN(ap->nval), fs);
ap->tval &= ~STR;