From 1133130986a78628ea297ce1f6a023baf4382d8f Mon Sep 17 00:00:00 2001 From: Keith Packard Date: Sat, 9 Dec 2017 16:56:20 -0800 Subject: altos/scheme: Let readline know if there's a list in progress This lets the interactive prompt change based on what state the lexer is in Signed-off-by: Keith Packard --- src/scheme/test/ao_scheme_test.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/scheme/test/ao_scheme_test.c') diff --git a/src/scheme/test/ao_scheme_test.c b/src/scheme/test/ao_scheme_test.c index 15c71203..686e7169 100644 --- a/src/scheme/test/ao_scheme_test.c +++ b/src/scheme/test/ao_scheme_test.c @@ -78,7 +78,7 @@ ao_scheme_getc(void) return getc(ao_scheme_file); if (newline) { - if (ao_scheme_read_stack) + if (ao_scheme_read_list) printf("+ "); else printf("> "); -- cgit v1.2.3