Если вы хотите очистить текущее пространство имен от всех временных переменных и функций, которые вы объявили, вы можете использовать этот один вкладыш (или сделать из него функцию):
(map #(ns-unmap *ns* %) (keys (ns-interns *ns*)))
или
(ns myutil)
(defn ns-clean
"Remove all internal mappings from a given name space or the current one if no parameter given."
([] (ns-clean *ns*))
([ns] (map #(ns-unmap ns %) (keys (ns-interns ns)))))
(ns mytest)
... make loads of junk ...
(myutil/ns-clean)
... great!!! I can now make all new junk ...
Он не претендует на то, чтобы дать вам скрипучее чистое пространство имен, только одно с меньшим количеством мусора, которое обычно накапливается в типичном сеансе repl.
Используйте с осторожностью: не вынимайте коврик из-под ног!