#+sb-xc cl:class
(:make-load-form-fun class-make-load-form-fun)
(:include ctype
- (:class-info (type-class-or-lose #-sb-xc 'sb!xc:class
+ (class-info (type-class-or-lose #-sb-xc 'sb!xc:class
#+sb-xc 'cl:class)))
(:constructor nil)
#-no-ansi-print-object
generic-sequence collection))
(null
:translation (member nil)
- :inherits (list sequence
+ :inherits (symbol list sequence
mutable-sequence mutable-collection
- generic-sequence collection symbol)
- :direct-superclasses (list symbol))
+ generic-sequence collection)
+ :direct-superclasses (symbol list))
(generic-number :state :read-only)
(number :translation number :inherits (generic-number))
(complex