X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fclass.lisp;h=9c60ee063bd313060e3aff6d8d0b1f00f0e23916;hb=4680204d81349894f47d2ba5fcfc92ecf4e725d3;hp=4b2f936e1b2678342e6010e3f31dfef243e9542a;hpb=cd1f265dd851941557ed3f764248c339c07493a9;p=sbcl.git

diff --git a/src/code/class.lisp b/src/code/class.lisp
index 4b2f936..9c60ee0 100644
--- a/src/code/class.lisp
+++ b/src/code/class.lisp
@@ -1158,9 +1158,8 @@
       :depth 3
       :inherits (instance)))))
 
-;;; comment from CMU CL:
-;;;   See also type-init.lisp where we finish setting up the
-;;;   translations for built-in types.
+;;; See also src/code/class-init.lisp where we finish setting up the
+;;; translations for built-in types.
 (!cold-init-forms
   (dolist (x *built-in-classes*)
     #-sb-xc-host (/show0 "at head of loop over *BUILT-IN-CLASSES*")