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

diff --git a/src/module-parse.lisp b/src/module-parse.lisp
index 9522085..e33b6d3 100644
--- a/src/module-parse.lisp
+++ b/src/module-parse.lisp
@@ -377,6 +377,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)