From c0d5981ff9b125e0c56ce68707ade7e07e304206 Mon Sep 17 00:00:00 2001
From: Paul Gilbert
Date: Sat, 22 Jun 2019 22:02:51 -0700
Subject: GLK: ALAN2: Fix quitting in-game

---
 engines/glk/alan2/parse.cpp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'engines/glk/alan2/parse.cpp')

diff --git a/engines/glk/alan2/parse.cpp b/engines/glk/alan2/parse.cpp
index bc12d3ea8e..5c9fd35db4 100644
--- a/engines/glk/alan2/parse.cpp
+++ b/engines/glk/alan2/parse.cpp
@@ -150,7 +150,7 @@ static char *gettoken(char *tokBuf) {
 	return tokBuf;
 }
 
-static void agetline() {
+static void agetline(CONTEXT) {
 	para();
 	do {
 		statusline();
@@ -164,7 +164,7 @@ static void agetline() {
 				return;
 
 			newline();
-			quit();
+			CALL0(quit)
 		}
 
 		getPageSize();
@@ -189,7 +189,7 @@ static void scan(CONTEXT) {
 	int w;
 	char *str;
 
-	agetline();
+	CALL0(agetline)
 	if (g_vm->shouldQuit())
 		return;
 
-- 
cgit v1.2.3