X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fctor.lisp;h=0c2e4ebdbd9d3b6c38d64f015c3a42fe4d43a286;hb=447477e72bd4fe54e678a28bdcc4a2802797d6ed;hp=6db57f9e5929842455a7a8d32c1e1ae1cad6f5f1;hpb=444d2072bc52e60a41af62ee22e343e76109212f;p=sbcl.git

diff --git a/src/pcl/ctor.lisp b/src/pcl/ctor.lisp
index 6db57f9..0c2e4eb 100644
--- a/src/pcl/ctor.lisp
+++ b/src/pcl/ctor.lisp
@@ -110,8 +110,8 @@
   :slot-names (function-name class-name class initargs)
   :boa-constructor %make-ctor
   :superclass-name function
-  :metaclass-name random-pcl-classoid
-  :metaclass-constructor make-random-pcl-classoid
+  :metaclass-name static-classoid
+  :metaclass-constructor make-static-classoid
   :dd-type funcallable-structure
   :runtime-type-checks-p nil)