Advertisement
Guest User

Untitled

a guest
Mar 21st, 2018
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (defmacro def-functorC
  2.   [fn-name fn-arg  body]
  3.   `(defn ~fn-name [[context# ~fn-arg]]
  4.      (list context# (eval ~(map #(if (= % :context) context# %) body)))))
  5.  
  6. ;; I want all instances of :context in my macro to be replaced by the same exact symbol generated by context#
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement