X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/5608b1af2e7a70cf8ea844d16213b933649a96ed..2aa518549b302b3556dbaa42585e6fc16a63ae7c:/src/class-layout-proto.lisp

diff --git a/src/class-layout-proto.lisp b/src/class-layout-proto.lisp
index ef75710..19bb897 100644
--- a/src/class-layout-proto.lisp
+++ b/src/class-layout-proto.lisp
@@ -172,14 +172,14 @@ (defclass vtmsgs ()
 (export 'compte-vtmsgs)
 (defgeneric compute-vtmsgs (class subclass chain-head chain-tail)
   (:documentation
-   "Return a VTMSGS object containing method entries for CLASS.
+   "Return a `vtmsgs' object containing method entries for CLASS.
 
    The CHAIN-HEAD describes which chain the method entries should be
    constructed for.
 
-   The default method simply calls MAKE-METHOD-ENTRY for each of the methods
-   and wraps a VTMSGS object around them.  This ought to be enough for almost
-   all purposes."))
+   The default method simply calls `make-method-entry' for each of the
+   methods and wraps a `vtmsgs' object around them.  This ought to be enough
+   for almost all purposes."))
 
 ;;; class-pointer