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

diff --git a/src/module-parse.lisp b/src/module-parse.lisp
index da1c47f..d64e22e 100644
--- a/src/module-parse.lisp
+++ b/src/module-parse.lisp
@@ -349,7 +349,7 @@ (defun parse-class-body (scanner pset name supers)
 			(when (consp name)
 			  (cerror*-with-location
 			   scanner
-			   "Method declarations must have function type.")
+			   "Method declarations must have function type")
 			  (setf name (cdr name)))
 			(parse-slot-item sub-pset base-type type name))
 		       ((consp name)