"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