From b2b78f48f0ef5de7253df428cd53115e4a88a84d Mon Sep 17 00:00:00 2001
From: Paul Gilbert
Date: Sat, 22 Jun 2019 22:18:20 -0700
Subject: GLK: ALAN2: Fixes for restarting in-game

---
 engines/glk/alan2/exe.cpp  | 6 +++---
 engines/glk/alan2/main.cpp | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/engines/glk/alan2/exe.cpp b/engines/glk/alan2/exe.cpp
index 2acd9d2885..5ff79c88f4 100644
--- a/engines/glk/alan2/exe.cpp
+++ b/engines/glk/alan2/exe.cpp
@@ -178,13 +178,13 @@ void quit(CONTEXT) {
 			CALL1(terminate, 0)
 		}
 
-		if (strcmp(buf, "restart") == 0) {
+		if (scumm_stricmp(buf, "restart") == 0) {
 			g_vm->setRestart(true);
 			LONG_JUMP
-		} else if (strcmp(buf, "restore") == 0) {
+		} else if (scumm_stricmp(buf, "restore") == 0) {
 			restore();
 			LONG_JUMP
-		} else if (strcmp(buf, "quit") == 0) {
+		} else if (scumm_stricmp(buf, "quit") == 0) {
 			CALL1(terminate, 0)
 		}
 	}
diff --git a/engines/glk/alan2/main.cpp b/engines/glk/alan2/main.cpp
index e6d2226d24..1371ace2e1 100644
--- a/engines/glk/alan2/main.cpp
+++ b/engines/glk/alan2/main.cpp
@@ -1422,7 +1422,7 @@ void run() {
 		init();
 
 		Context ctx;
-		while (!g_vm->shouldQuit()) {
+		while (!g_vm->shouldQuit() && !g_vm->shouldRestart()) {
 			if (!ctx._break) {
 				if (dbgflg)
 					debug();
-- 
cgit v1.2.3