Commit c50e57a4 authored by pfdietz's avatar pfdietz
Browse files

Three more subtype tests for zero-d array types

parent 020e31ee
...@@ -124,6 +124,17 @@ ...@@ -124,6 +124,17 @@
(subtypep* '(array t nil) 'integer) (subtypep* '(array t nil) 'integer)
nil t) nil t)
(deftest subtypep.array.11
(subtypep* '(array t nil) '(array t (*)))
nil t)
(deftest subtypep.array.12
(subtypep* '(array t nil) '(array t 1))
nil t)
(deftest subtypep.array.13
(subtypep* '(array bit nil) '(array bit 1))
nil t)
;;;; Tests on the definitions of various vector types ;;;; Tests on the definitions of various vector types
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment