1 files changed, 12 insertions(+), 1 deletions(-)

M src/uxnlin.tal

@@ 70,7 70,7 @@ JMP2
 JMP2r
 	&append ;token ;sput JMP2
 	&toggle-sleep LIT "( EQU ,&sleep STR JMP2r
-	&toggle-mute LIT "[ EQU ,parse/mute STR ;token ;sclr JSR2 JMP2r
+	&toggle-mute LIT "[ EQU ,parse/mute STR ;reset JMP2
 	&line .stats/lines LDZ2k INC2 ROT STZ2 ( , )
 
 @parse ( char -- )


@@ 147,6 147,17 @@ JMP2r
 
 JMP2
 
+@reset ( -- )
+
+	;token ;sclr JSR2
+	;token/last ;sclr JSR2
+	;token/last2 ;sclr ( .. )
+
+JMP2
+
+(
+@|helpers )
+
 @is-arithmetic ( token* -- flag )
 
 	,&t STR2