X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fbraid.lisp;h=98c0c8f29e2c28c2c589cc7d96b8860432b53899;hb=6ddaf294e5a7e3b1792ed1d9c342894c38538773;hp=a3cabbb1f8005ec675b75f6ffe847413899b1c26;hpb=3a5eefac8a65dfd36729031f0a9b9dd8c022b7f2;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)))