diff options
-rw-r--r-- | Src/text.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Src/text.c b/Src/text.c index fc5a2a5c7..730d3ea53 100644 --- a/Src/text.c +++ b/Src/text.c @@ -182,6 +182,7 @@ struct tstack { } _redir; struct { char *strs; + Wordcode end; } _funcdef; struct { Wordcode end; @@ -372,11 +373,13 @@ gettext2(Estate state) taddnl(); n = tpush(code, 1); n->u._funcdef.strs = state->strs; + n->u._funcdef.end = end; state->strs = (char *) (p + (*state->pc)); state->pc += 2; } } else { state->strs = s->u._funcdef.strs; + state->pc = s->u._funcdef.end; tindent--; taddnl(); taddstr("}"); |