Skip to content

Instantly share code, notes, and snippets.

@patrickgombert
Last active August 29, 2015 14:09
Show Gist options
  • Save patrickgombert/4f4e3b51ea6ee81e76b6 to your computer and use it in GitHub Desktop.
Save patrickgombert/4f4e3b51ea6ee81e76b6 to your computer and use it in GitHub Desktop.
Find difference in public vars
(let [next-public (ns-publics 'clojure.next)
core-public (ns-publics 'clojure.core)
[compl not-compl] (let [s (set (keys next-public))]
(loop [ks (keys core-public)
compl '()
not-compl '()]
(if (empty? ks)
[compl not-compl]
(if (contains? s (first ks))
(recur (rest ks) (conj compl (first ks)) not-compl)
(recur (rest ks) compl (conj not-compl (first ks)))))))]
(doseq [x compl] (println "* [X] - " x))
(doseq [x not-compl] (println "* [ ] - " x)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment