luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix #1350: map clojure.lang.Var to sci.lang.Var

Browse source
This commit is contained in:
Michiel Borkent 2022-09-05 20:59:29 +02:00
parent ef41365656
commit 18e19934d1
2 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/babashka/impl/classes.clj
View file

@ -594,7 +594,8 @@
(instance? java.util.Iterator v) (instance? java.util.Iterator v)
java.util.Iterator java.util.Iterator
;; keep commas for merge friendliness ;; keep commas for merge friendliness
,,,)))] ,,,)))
m (assoc m (list 'quote 'clojure.lang.Var) 'sci.lang.Var)]
m)) m))

3
test/babashka/main_test.clj
View file

@ -829,6 +829,9 @@ true")))
(testing "for all public vars, ns/symbol from ns map matches metadata" (testing "for all public vars, ns/symbol from ns map matches metadata"
(is (empty? (bb nil (.getPath (io/file "test" "babashka" "scripts" "check_var_names.bb"))))))) (is (empty? (bb nil (.getPath (io/file "test" "babashka" "scripts" "check_var_names.bb")))))))
(deftest clojure-lang-var-mapping-test
(is (= :var (bb nil "(defprotocol Foo (foo [_])) (extend-protocol Foo clojure.lang.Var (foo [_] :var)) (foo #'inc)"))))
;;;; Scratch ;;;; Scratch
(comment (comment