From bbbdc92b7ff9b48040f7c13cb74e972aa3f458f9 Mon Sep 17 00:00:00 2001
From: Attila Lendvai <attila.lendvai@gmail.com>
Date: Fri, 4 Dec 2009 13:34:05 +0200
Subject: [PATCH] fix: parse-ordinary-lambda-list was normalizing keyword args
 a bit even when it was not asked for

---
 macros.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/macros.lisp b/macros.lisp
index 8424ce8..031109d 100644
--- a/macros.lisp
+++ b/macros.lisp
@@ -199,7 +199,7 @@ Signals a PROGRAM-ERROR is the lambda-list is malformed."
                      (check-variable elt "keyword parameter")
                      (setf elt (if normalize-keyword
                                    (list (list (make-keyword elt) elt) nil nil)
-                                   (list elt)))))
+                                   elt))))
               (push elt keys))
              (&aux
               (if (consp elt)
-- 
GitLab