diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2016-11-22 20:30:09 +0200 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2016-11-22 20:30:09 +0200 |
commit | 52715ba9f8510f30368462fee1b1d24bf282b0aa (patch) | |
tree | 2b7569bb73d64433f84ccf2672c3973809804b51 /debug.c | |
parent | f7ae9cfb843379b95d8cb44dbb8de7bbf11862de (diff) | |
parent | 033faa34a743231a88a6c555503397045726666f (diff) | |
download | egawk-52715ba9f8510f30368462fee1b1d24bf282b0aa.tar.gz egawk-52715ba9f8510f30368462fee1b1d24bf282b0aa.tar.bz2 egawk-52715ba9f8510f30368462fee1b1d24bf282b0aa.zip |
Merge branch 'master' into feature/cmake
Diffstat (limited to 'debug.c')
-rw-r--r-- | debug.c | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -1790,6 +1790,8 @@ initialize_watch_item(struct list_item *w) } else if (symbol->type == Node_var_array) { w->flags |= CUR_IS_ARRAY; w->cur_size = assoc_length(symbol); + } else if (symbol->type == Node_val && (symbol->flags & REGEX) != 0) { + w->cur_value = dupnode(symbol); } /* else can't happen */ } @@ -3703,7 +3705,10 @@ print_memory(NODE *m, NODE *func, Func_print print_func, FILE *fp) print_func(fp, "%g", m->numbr); } else if ((m->flags & STRING) != 0) pp_string_fp(print_func, fp, m->stptr, m->stlen, '"', false); - else + else if ((m->flags & REGEX) != 0) { + print_func(fp, "@"); + pp_string_fp(print_func, fp, m->stptr, m->stlen, '/', false); + } else print_func(fp, "-?-"); print_func(fp, " [%s]", flags2str(m->flags)); break; |