File tree Expand file tree Collapse file tree 1 file changed +6
-2
lines changed Expand file tree Collapse file tree 1 file changed +6
-2
lines changed Original file line number Diff line number Diff line change 41
41
clojure.core/ns-interns but returns var analysis maps not vars."
42
42
[ns ]
43
43
{:pre [(symbol? ns )]}
44
- (get-in @env/*compiler* [::ana/namespaces ns :defs ]))
44
+ (merge
45
+ (get-in @env/*compiler* [::ana/namespaces ns :macros ])
46
+ (get-in @env/*compiler* [::ana/namespaces ns :defs ])))
45
47
46
48
(defn ns-publics
47
49
" Given a namespace return all the public var analysis maps. Analagous to
48
50
clojure.core/ns-publics but returns var analysis maps not vars."
49
51
[ns ]
50
52
{:pre [(symbol? ns )]}
51
- (->> (get-in @env/*compiler* [::ana/namespaces ns :defs ])
53
+ (->> (merge
54
+ (get-in @env/*compiler* [::ana/namespaces ns :macros ])
55
+ (get-in @env/*compiler* [::ana/namespaces ns :defs ]))
52
56
(remove (fn [[k v]] (:private v)))
53
57
(into {})))
54
58
You can’t perform that action at this time.
0 commit comments