Fix for Jira bug I7-1856

README.md

@@ -1,6 +1,6 @@
 # Inform 7
 
-v10.1.0-beta+6V14 'Krypton' (26 May 2022)
+v10.1.0-beta+6V15 'Krypton' (27 May 2022)
 
 ## About Inform 7
 

build.txt

@@ -1,3 +1,3 @@
 Prerelease: beta
-Build Date: 26 May 2022
-Build Number: 6V14
+Build Date: 27 May 2022
+Build Number: 6V15

inform7/Internal/Inter/CommandParserKit/Sections/Parser.i6t

@@ -245,7 +245,7 @@ $$ C = 100 + N $$
 	for (i=from: i<=to: i++) print (char) i->0;
 ];
 
-[ SpliceSnippet snip t i w1 w2 nextw at endsnippet newlen;
+[ SpliceSnippet snip t i w1 w2 nextw at endsnippet newlen saved;
 	w1 = snip/100; w2 = w1 + (snip%100) - 1;
 	if ((w2<w1) || (w1<1)) {
 		if ((w1 == 1) && (w2 == 0)) return;
@@ -255,13 +255,15 @@ $$ C = 100 + N $$
 	nextw = w2 + 1;
 	at = WordAddress(w1) - buffer;
 	if (nextw <= WordCount()) endsnippet = 100*nextw + (WordCount() - nextw + 1);
+	saved = buffer2-->0;
 	buffer2-->0 = 120;
 	newlen = VM_PrintToBuffer(buffer2, 120, SpliceSnippet__TextPrinter, t, endsnippet);
 	for (i=0: (i<newlen) && (at+i<120): i++) buffer->(at+i) = buffer2->(WORDSIZE+i);
 	#Ifdef TARGET_ZCODE; buffer->1 = at+i; #ifnot; buffer-->0 = at+i; #endif;
 	for (:at+i<120:i++) buffer->(at+i) = ' ';
 	VM_Tokenise(buffer, parse);
 	players_command = 100 + WordCount();
+	buffer2-->0 = saved;
 	@pull say__pc; @pull say__p;
 ];