X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Ftime.lisp;h=1f2bacbec457c270cc4ce07fff5a3d05f2b222c7;hb=5ec8d0c1c8b7939818b75118b472fac1af554f9a;hp=717fd33977fe71c049618c334fc1dd2081e40b54;hpb=c614e496a22086f6aa1a747e4bef883c74b8a597;p=sbcl.git

diff --git a/src/pcl/time.lisp b/src/pcl/time.lisp
index 717fd33..1f2bacb 100644
--- 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))))