X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/b2983f3591981a916f748362d91ff0e2817552cb..f64eb323a5798e155cc494043f5f750abf50a482:/src/module-parse.lisp

diff --git a/src/module-parse.lisp b/src/module-parse.lisp
index 35e07ea..15a7d8f 100644
--- a/src/module-parse.lisp
+++ b/src/module-parse.lisp
@@ -369,6 +369,7 @@ (defun parse-class-body (scanner pset name supers)
 			    (peek
 			     (seq ((ds (parse-c-type scanner))
 				   (dc (parse-maybe-dotted-declarator ds))
+				   (nil (commit))
 				   (nil (class-item-dispatch sub-pset
 							     ds
 							     (car dc)