X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fbraid.lisp;h=98c0c8f29e2c28c2c589cc7d96b8860432b53899;hb=3a2e34d8ed1293f2cecb5c2c6ea359b622e3f4f8;hp=a3cabbb1f8005ec675b75f6ffe847413899b1c26;hpb=dc3c6bfad38cbd96013cf76ce93a9273f01c46d2;p=sbcl.git

diff --git a/src/pcl/braid.lisp b/src/pcl/braid.lisp
index a3cabbb..98c0c8f 100644
--- a/src/pcl/braid.lisp
+++ b/src/pcl/braid.lisp
@@ -67,7 +67,7 @@
                                              (get-instance-hash-code))))
     (set-funcallable-instance-function
      fin
-     #'(instance-lambda (&rest args)
+     #'(lambda (&rest args)
          (declare (ignore args))
          (error "The function of the funcallable-instance ~S has not been set."
                 fin)))