:skipped-on `(not (and :stack-allocatable-vectors
:c-stack-is-control-stack)))
(assert-no-consing (make-array-on-stack-6))
(assert-no-consing (make-array-on-stack-7))
(assert-no-consing (make-array-on-stack-8))
(assert-no-consing (make-array-on-stack-9))
:skipped-on `(not (and :stack-allocatable-vectors
:c-stack-is-control-stack)))
(assert-no-consing (make-array-on-stack-6))
(assert-no-consing (make-array-on-stack-7))
(assert-no-consing (make-array-on-stack-8))
(assert-no-consing (make-array-on-stack-9))