From: Mark Wooding <mdw@distorted.org.uk>
Date: Mon, 9 Jul 2018 12:05:29 +0000 (+0100)
Subject: src/class-make-impl.lisp (check-method-argument-lists): Fix docstring.
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/commitdiff_plain/2f8a99a834db051434d30471e9cc26a41f6a5fa7

src/class-make-impl.lisp (check-method-argument-lists): Fix docstring.
---

diff --git a/src/class-make-impl.lisp b/src/class-make-impl.lisp
index 5a897d4..da6cd2c 100644
--- a/src/class-make-impl.lisp
+++ b/src/class-make-impl.lisp
@@ -317,9 +317,9 @@ (defun check-method-argument-lists (method-type message-type)
   "Signal an error unless METHOD-TYPE and MESSAGE-TYPE have matching argument
    lists.
 
-  This checks that (a) the two types have matching lists of mandatory
-  arguments, and (b) that either both or neither types accept keyword
-  arguments."
+   This checks (a) that the two types have matching lists of mandatory
+   arguments, and (b) that either both or neither types accept keyword
+   arguments."
   (let ((message-keywords-p (typep message-type 'c-keyword-function-type))
 	(method-keywords-p (typep method-type 'c-keyword-function-type)))
     (cond (message-keywords-p