Skip to content

Instantly share code, notes, and snippets.

@deque-blog

deque-blog/dsl_arithmetic_4_print_expr_ex.clj

Last active January 22, 2017 17:57
Show Gist options
  • Save deque-blog/78f2f85c2cfc842b7a6c31692deaac4c to your computer and use it in GitHub Desktop.
Save deque-blog/78f2f85c2cfc842b7a6c31692deaac4c to your computer and use it in GitHub Desktop.
Download ZIP
Raw
dsl_arithmetic_4_print_expr_ex.clj
(def expr
(add
(cst 1) (cst 2)
(mul (cst 0) (sym "x") (sym "y"))
(mul (cst 1) (sym "y") (cst 2))
(add (cst 0) (sym "x"))))
(print-expr expr)
=> "(+ 1 2 (* 0 x y) (* 1 y 2) (+ 0 y))"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment