From c802a375af8c28462d8d1bfc87dffa03e9736895 Mon Sep 17 00:00:00 2001 From: Raymond Toy <toy.raymond@gmail.com> Date: Wed, 24 Jan 2018 09:41:32 -0800 Subject: [PATCH] Disable arglist declaration for cmucl Don't know why this doesn't work, but removing it makes the macro compile correctly. --- src/clx/macros.lisp | 1 + 1 file changed, 1 insertion(+) diff --git a/src/clx/macros.lisp b/src/clx/macros.lisp index 84d45e105..8d9db3c8f 100644 --- a/src/clx/macros.lisp +++ b/src/clx/macros.lisp @@ -85,6 +85,7 @@ ;; If no third body form is present, then these macros assume that ;; (AND (TYPEP ,thing 'type) (PUT-type ,thing)) can be generated. ;; these predicating puts are used by the OR accessor. + #-cmu (declare (arglist name (width) get-macro put-macro &optional predicating-put-macro)) (when (cdddr get-put-macros) (error "Too many parameters to define-accessor: ~s" (cdddr get-put-macros))) -- GitLab