store/[org.clojure/core.typed "0.2.80"] clj::clojure.core.typed.test.contract-utils-test/hmap-c-test

Source

(deftest hmap-c-test
  (is ((hmap-c?) 
       {}))
  (is (not ((hmap-c?) 
            nil)))
  (is ((hmap-c? :k symbol?) 
       {:k 'a}))
  (is (not ((hmap-c? :k symbol?) 
            {})))
  (is ((hmap-c? (optional :k) symbol?) 
       {:k 'a}))
  (is (not ((hmap-c? (optional :k) symbol?) 
            {:k :a})))
  (is ((hmap-c? (optional :k) symbol?) 
       {})))

Uses on crossclj