(use 'clojure.contrib.javadoc)
(use 'clojure.contrib.repl-utils)

(defmacro debug
  [expr]
  `(let [result# ~expr]
     (println '~expr "=>" result#)
     (flush)
     result#))

(defmacro ns-reload! [ns]
  `(do
     (if (find-ns '~ns)
       (doseq [s# (keys (ns-publics '~ns))] (ns-unmap '~ns s#)))
     (require :reload-all '~ns)))