about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--Src/text.c3
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("}");