Advertisement
Guest User

Untitled

a guest
Dec 20th, 2015
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (defmacro generate-routes [host paths]
  2.   `(do ~(for [path (into [] paths)]
  3.           `(defn ~(first path) []
  4.              (println (str ~host "/" ~(last path)))))))
  5.  
  6. (macroexpand-1 `(generate-routes c/host c/paths))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement