From 0d4829e552043b0e8298ec94c208bd3391d9f4e2 Mon Sep 17 00:00:00 2001
From: Graham Nelson <graham.nelson@mod-langs.ox.ac.uk>
Date: Fri, 27 May 2022 00:18:42 +0100
Subject: [PATCH] Fix for Jira bug I7-1856

---
 README.md                                                   | 2 +-
 build.txt                                                   | 4 ++--
 inform7/Internal/Inter/CommandParserKit/Sections/Parser.i6t | 4 +++-
 3 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/README.md b/README.md
index f1742f1d7..0332d0e62 100644
--- a/README.md
+++ b/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
 
diff --git a/build.txt b/build.txt
index 3888cc4d9..756355b84 100644
--- a/build.txt
+++ b/build.txt
@@ -1,3 +1,3 @@
 Prerelease: beta
-Build Date: 26 May 2022
-Build Number: 6V14
+Build Date: 27 May 2022
+Build Number: 6V15
diff --git a/inform7/Internal/Inter/CommandParserKit/Sections/Parser.i6t b/inform7/Internal/Inter/CommandParserKit/Sections/Parser.i6t
index c1b045b75..d993ba6ed 100644
--- a/inform7/Internal/Inter/CommandParserKit/Sections/Parser.i6t
+++ b/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,6 +255,7 @@ $$ 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);
@@ -262,6 +263,7 @@ $$ C = 100 + N $$
 	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;
 ];