(defn ns-publics
"Returns a map of the public intern mappings for the namespace."
{:added "1.0"
:static true}
[ns]
(let [ns (the-ns ns)]
(filter-key val (fn [^clojure.lang.Var v] (and (instance? clojure.lang.Var v)
(= ns (.ns v))
(.isPublic v)))
(ns-map ns))))