Skip inapplicable tests.

This commit is contained in:
Stas Boukarev 2025-07-11 04:02:56 +03:00
parent 5f439cc5ba
commit c6f34d7a33

View file

@ -37,6 +37,9 @@
*datatypes*)))
data)))
(unless (gethash 'sb-c:jump-table sb-c::*backend-template-names*)
(invoke-restart 'run-tests::skip-file))
(with-test (:name :phash-typecase-array-of-symbols)
;; should compile to an array index, not a jump table.
;; The resulting code used to be over 1KiB in size, now it's 180 bytes or so