From: Mark Wooding <mdw@distorted.org.uk>
Date: Sun, 26 Mar 2017 14:16:18 +0000 (+0100)
Subject: src/module-parse.lisp: Improve error recovery for `lisp' items.
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/commitdiff_plain/634c11b088818386ab98ad2282d56d20195cc2de

src/module-parse.lisp: Improve error recovery for `lisp' items.
---

diff --git a/src/module-parse.lisp b/src/module-parse.lisp
index 95196f8..aa7e9f4 100644
--- a/src/module-parse.lisp
+++ b/src/module-parse.lisp
@@ -211,7 +211,7 @@ (define-pluggable-parser module lisp (scanner pset)
 			     (scanner-step scanner)
 			     (values sexp t t))
 			   (values '((:id "lisp")) nil nil)))
-		 #\;)
+		 (nil (must #\;)))
 	     (eval sexp)))))
 
 ;;;--------------------------------------------------------------------------