Skip to content

Commit e77924a

Browse files
committed
Filter :refer'd macros via env-supplied :built-in-macro-nss
1 parent f297e46 commit e77924a

1 file changed

Lines changed: 4 additions & 1 deletion

File tree

src/squint/compiler_common.cljc

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -751,7 +751,10 @@
751751
(get rename refer refer)) refer)
752752
(repeat (if (symbol? original-libname)
753753
original-libname libname)))))))))
754-
(let [runtime-refer (remove #(builtin-refer-is-macro? original-libname %) refer)]
754+
(let [runtime-refer (remove (fn [refer-sym]
755+
(or (builtin-refer-is-macro? original-libname refer-sym)
756+
(contains? (get (:built-in-macro-nss env) original-libname) refer-sym)))
757+
refer)]
755758
(str
756759
(when (seq runtime-refer)
757760
(let [referred+renamed (str/join ", "

0 commit comments

Comments
 (0)