(deftest allocation-information.4
#+gencgc
(tai #'cons :heap
;; FIXME: This is the canonical GENCGC result. On PPC we sometimes get
;; :LARGE T, which doesn't seem right -- but ignore that for now.
'(:space :dynamic :generation 6 :write-protected t :boxed t :pinned nil :large nil)
(deftest allocation-information.4
#+gencgc
(tai #'cons :heap
;; FIXME: This is the canonical GENCGC result. On PPC we sometimes get
;; :LARGE T, which doesn't seem right -- but ignore that for now.
'(:space :dynamic :generation 6 :write-protected t :boxed t :pinned nil :large nil)