Skip to content

Instantly share code, notes, and snippets.

@AlexBaranosky
Created January 18, 2014 10:26
Show Gist options
  • Save AlexBaranosky/8488616 to your computer and use it in GitHub Desktop.
Save AlexBaranosky/8488616 to your computer and use it in GitHub Desktop.
gui.internal.parser> (def env (aj/empty-env))
#'gui.internal.parser/env
gui.internal.parser> (aj/analyze '(println "!") env)
{:ret-tag java.lang.Object, :children [:args :fn], :meta {:line 1, :column 14}, :op :invoke, :form (println "!"), :env {:file "NO_SOURCE_PATH", :line 1, :column 14, :loop-locals [], :context :expr, :ns gui.internal.parser}, :fn {:id 0, :arglists ([& more]), :form println, :env {:file "NO_SOURCE_PATH", :loop-locals [], :context :expr, :ns gui.internal.parser}, :op :var, :assignable? false, :var #'clojure.core/println}, :args [{:id 1, :tag java.lang.String, :op :const, :env {:file "NO_SOURCE_PATH", :loop-locals [], :context :expr, :ns gui.internal.parser}, :type :string, :literal? true, :val "!", :form "!"}]}
gui.internal.parser> (def pp clojure.pprint/pprint)
#'gui.internal.parser/pp
gui.internal.parser> (pp (aj/analyze '(println "!") env))
{:ret-tag java.lang.Object,
:children [:args :fn],
:meta {:line 1, :column 18},
:op :invoke,
:form (println "!"),
:env
{:file "NO_SOURCE_PATH",
:line 1,
:column 18,
:loop-locals [],
:context :expr,
:ns gui.internal.parser},
:fn
{:id 0,
:arglists ([& more]),
:form println,
:env
{:file "NO_SOURCE_PATH",
:loop-locals [],
:context :expr,
:ns gui.internal.parser},
:op :var,
:assignable? false,
:var #<Var@3af89e13:
#<core$println clojure.core$println@6e6fdcaf>>},
:args
[{:id 1,
:tag java.lang.String,
:op :const,
:env
{:file "NO_SOURCE_PATH",
:loop-locals [],
:context :expr,
:ns gui.internal.parser},
:type :string,
:literal? true,
:val "!",
:form "!"}]}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment