store/[org.clojure/core.typed "0.2.81"] clj::clojure.core.typed.test.nth-path-elem-test/nth-path-elem-test-first

Source

(deftest nth-path-elem-test-first
  (is-tc-e
   (do
     (defalias StatementA '[':params String])
     (defalias StatementB '[':no-params])
     (defalias Statement (U StatementA StatementB))
     (fn [stmt :- Statement] :- Any
       (if (= :params (first stmt))
         (let [param (nth stmt 1)]
           (ann-form param String)))))))

Uses on crossclj