Skip to content

Instantly share code, notes, and snippets.

@petterik
Last active October 7, 2016 12:45
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save petterik/abfae9d8383138b2daa83588e4c7a9fb to your computer and use it in GitHub Desktop.
Save petterik/abfae9d8383138b2daa83588e4c7a9fb to your computer and use it in GitHub Desktop.
parser-joins.cljs
(defn join [{:keys [parser query target] :as env} k _]
(let [ret (parser env query target)]
(if target
(when (seq ret)
{target (assoc ast :query ret)})
{:value ret})))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment