diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2011-05-04 23:05:28 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2011-05-04 23:05:28 +0300 |
commit | e7dced088c226280bcb1edb252011d6c186504e4 (patch) | |
tree | 868eabc52db1e4a08e1385868e1a56062e74ea40 /eval.c | |
parent | 19093d5a231421594788d633e811859276d8f92f (diff) | |
download | egawk-e7dced088c226280bcb1edb252011d6c186504e4.tar.gz egawk-e7dced088c226280bcb1edb252011d6c186504e4.tar.bz2 egawk-e7dced088c226280bcb1edb252011d6c186504e4.zip |
Fix problem with subarray of deleted array.
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -455,6 +455,7 @@ flags2str(int flagval) { FUNC, "FUNC" }, { FIELD, "FIELD" }, { INTLSTR, "INTLSTR" }, + { NUMIND, "NUMIND" }, #ifdef WSTRCUR { WSTRCUR, "WSTRCUR" }, #endif @@ -1758,6 +1759,7 @@ top: r->type = Node_var_array; r->var_array = NULL; r->vname = estrdup(arr_name, strlen(arr_name)); + r->parent_array = t1; *assoc_lookup(t1, t2, FALSE) = r; } else if (r->type != Node_var_array) { const char *arr_name = make_aname(t1, t2); |