Skip to content
Browse files

Fix HVec parsing in runtime parsing

  • Loading branch information...
1 parent c446ac4 commit f6178eaf0c85efc78f7045e0db481eb7caabec46 @frenchy64 frenchy64 committed
View
2 src/main/clojure/clojure/core/typed/parse_ast.clj
@@ -136,7 +136,7 @@
(when path
{:path-elems (mapv parse-path-elem path)})))
-(defn parse-HVec [fixed & {:keys [filter-sets objects]}]
+(defn parse-HVec [[_ fixed & {:keys [filter-sets objects]} :as syn]]
(merge
{:op :HVec
:types (mapv parse fixed)
View
2 src/test/clojure/clojure/core/typed/test/core.clj
@@ -3014,6 +3014,8 @@
:b Number}
:complete? true)))
+(deftest HVec-parse-ast-test
+ (is (clojure.core.typed.parse-ast/parse-clj '(HVec [Number]))))
;(deftest collect-on-eval-test
; (is (do (ann foo-bar Number)

0 comments on commit f6178ea

Please sign in to comment.
Something went wrong with that request. Please try again.