0.pre7.86:

[sbcl.git] / src / pcl / time.lisp

diff --git a/src/pcl/time.lisp b/src/pcl/time.lisp
index 717fd33..1f2bacb 100644 (file)
--- a/src/pcl/time.lisp
+++ b/src/pcl/time.lisp
@@ -88,7 +88,7 @@
            '(time-constant-keys-make-instance 1000))
       *tests*)
 
-(expanding-make-instance-top-level
+(expanding-make-instance-toplevel
 (defun constant-keys-make-instance (n)
   (dotimes-fixnum (i n) (make-instance 'plist-mixin))))