X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/002d481f71272b0605ac310f3cea595780dae531..abfdb01c8df52efd0ee4a4a98519d9aebd1956d9:/src/module-parse.lisp

diff --git a/src/module-parse.lisp b/src/module-parse.lisp
index 63d75cd..3f6c224 100644
--- a/src/module-parse.lisp
+++ b/src/module-parse.lisp
@@ -327,7 +327,7 @@ (defun parse-class-body (scanner pset name supers)
 		 ;;
 		 ;; Return a VALUE, ready for passing to a `sod-initializer'
 		 ;; constructor.
-		 (parse-delimited-fragment scanner #\= (list #\, #\;)
+		 (parse-delimited-fragment scanner #\= '(#\, #\;)
 					   :keep-end t))
 
 	       (parse-slot-item (sub-pset base-type type name)