X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fcpl.lisp;h=e8c7b58635e44d2805e60a239d1c1cdf6e3aeb4f;hb=1a6def3955b715472eb2c75b15660912b9f90173;hp=8fdd03830376e57824d9f1ff27a0f7b77a0674f1;hpb=0b5610d8a220a4b20cbeac958953ca4d67c00038;p=sbcl.git

diff --git a/src/pcl/cpl.lisp b/src/pcl/cpl.lisp
index 8fdd038..e8c7b58 100644
--- a/src/pcl/cpl.lisp
+++ b/src/pcl/cpl.lisp
@@ -23,8 +23,8 @@
 
 (in-package "SB-PCL")
 
-;;; compute-class-precedence-list
-;;;
+;;;; COMPUTE-CLASS-PRECEDENCE-LIST and friends
+
 ;;; Knuth section 2.2.3 has some interesting notes on this.
 ;;;
 ;;; What appears here is basically the algorithm presented there.