chiark / gitweb /
doc/syntax.tex, src/sod-module.5: Typeset `<qualifier>s' properly.
[sod] / src / class-layout-proto.lisp
index 0803b1842a6162d051a7db98dc059179b7aa259a..d34bf8b143dd11805281ff08ad31747d353f5b1b 100644 (file)
@@ -31,7 +31,7 @@ (cl:in-package #:sod)
 (export '(effective-slot effective-slot-class
          effective-slot-direct-slot effective-slot-initializer))
 (defclass effective-slot ()
-  ((%class :initarg :class :type sod-slot :reader effective-slot-class)
+  ((%class :initarg :class :type sod-class :reader effective-slot-class)
    (slot :initarg :slot :type sod-slot :reader effective-slot-direct-slot)
    (initializer :initarg :initializer :type (or sod-initializer null)
                :reader effective-slot-initializer))