- ;; allegro and lispworks don't reverse class-slots compared to the defclass form
- ;; subobject is already reversed from the dolist/push loop, so re-reverse on cmu/sbcl/scl
- #+(or cmu sbcl scl) subobjects
- #-(or cmu sbcl scl) (nreverse subobjects)
+ ;; sbcl/cmu reverse class-slots compared to the defclass form
+ ;; subobject is already reversed from the dolist/push loop, so re-reverse on cmu/sbcl
+ #+(or cmu sbcl) subobjects
+ #-(or cmu sbcl) (nreverse subobjects)