X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fmacros.lisp;h=feb191ca859a9034d56499803d62c9a00fdab8b2;hb=7861b0dc2f09dcb83de3c0addf534029d9906b5c;hp=4ef3dc0a749993e3f7f7ad6db16dacf4e60a5db2;hpb=c41cb4c87eae7b04f844dca5f7edb5086c5d2d68;p=sbcl.git

diff --git a/src/code/macros.lisp b/src/code/macros.lisp
index 4ef3dc0..feb191c 100644
--- a/src/code/macros.lisp
+++ b/src/code/macros.lisp
@@ -168,8 +168,7 @@
                              lambda-list
 			     (%simple-fun-name (%closure-fun definition))
 			     debug-name))
-                      ((#.sb!vm:simple-fun-header-widetag
-                        #.sb!vm:closure-fun-header-widetag)
+                      (#.sb!vm:simple-fun-header-widetag
                        (setf (%simple-fun-arglist definition) lambda-list
 			     (%simple-fun-name definition) debug-name))))
 	     name))))