Throw an exception on testing invalid type objects

This commit is contained in:
Joshua Suskalo 2022-01-18 14:00:00 -06:00
parent ded50d7a29
commit 634f371144

View file

@ -515,7 +515,8 @@
[type] [type]
(cond (cond
(qualified-keyword? type) type (qualified-keyword? type) type
(sequential? type) (keyword (first type)))) (sequential? type) (keyword (first type))
:else (throw (ex-info "Invalid type object" {:type type}))))
(def primitive? (def primitive?
"A set of all primitive types." "A set of all primitive types."