grub-fork/src-cljs/grub_client/macros.clj
2013-08-06 23:38:53 +03:00

13 lines
279 B
Clojure

(ns grub-client.macros)
(defmacro log [& args]
`(.log js/console ~@args))
(defmacro logs [& args]
(let [strings (map (fn [a] `(pr-str ~a)) args)]
`(.log js/console ~@strings)))
(defmacro go-loop [& body]
`(cljs.core.async.macros/go
(while true
~@body)))