X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fdlisp.lisp;h=27f601c7e89c725c4d51aa58209f00c59b24aafc;hb=0f3a5f2e8886d18d0b4f6485c38a42be629422ae;hp=030864ad3d29348f6efa72f1f72e3b416f20c892;hpb=25a4ce7810afffbbefa4e579d017e0da45b159a3;p=sbcl.git

diff --git a/src/pcl/dlisp.lisp b/src/pcl/dlisp.lisp
index 030864a..27f601c 100644
--- a/src/pcl/dlisp.lisp
+++ b/src/pcl/dlisp.lisp
@@ -101,7 +101,7 @@
                     '(.dfun-more-context. .dfun-more-count.)))))
 
 (defun make-fast-method-call-lambda-list (nargs applyp)
-  (list* '.pv-cell. '.next-method-call. (make-dfun-lambda-list nargs applyp)))
+  (list* '.pv. '.next-method-call. (make-dfun-lambda-list nargs applyp)))
 
 ;;; Emitting various accessors.