sogaiu/notes.md

Created March 12, 2026 10:56

Star (0) You must be signed in to star a gist
Fork (0) You must be signed in to fork a gist

Select an option

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/sogaiu/ee18a6b9b1dbfa548d6b61b6496966b7.js"></script>
Save sogaiu/ee18a6b9b1dbfa548d6b61b6496966b7 to your computer and use it in GitHub Desktop.

Download ZIP

macro hygiene stuff

Raw

(defmacro each-reverse [identifier list & body]
  (with-syms [$i $list]
    ~(let [,$list ,list]
      (var ,$i (,dec (,length ,$list)))
      (while (>= ,$i 0)
        (def ,identifier (in ,$list ,$i))
        ,;body
        (-- ,$i)))))

(defmacro each-reverse [identifier list & body]
  (with-syms [$i $list]
    ~(as-macro ,let [,$list ,list]
      (var ,$i (,dec (,length ,$list)))
      (while (,>= ,$i 0)
        (def ,identifier (,in ,$list ,$i))
        ,;body
        (as-macro ,-- ,$i)))))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment