diff options
| author | Joel Martin <github@martintribe.org> | 2014-04-16 23:57:50 -0500 |
|---|---|---|
| committer | Joel Martin <github@martintribe.org> | 2014-04-16 23:57:50 -0500 |
| commit | 8cb5cda46cf3aef847ae3926dc53a5e5f87fe261 (patch) | |
| tree | 13e5b2878f19ee24272ead8a92a9cb84b33ad0e5 /clojure/src/step3_env.clj | |
| parent | a05f7822b10ed4cdd61ed8384299a003baf1c1c6 (diff) | |
| download | mal-8cb5cda46cf3aef847ae3926dc53a5e5f87fe261.tar.gz mal-8cb5cda46cf3aef847ae3926dc53a5e5f87fe261.zip | |
All: move some fns to core. Major cleanup.
- Don't import/require core until step4.
- Define cond/or macros from step8
Diffstat (limited to 'clojure/src/step3_env.clj')
| -rw-r--r-- | clojure/src/step3_env.clj | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/clojure/src/step3_env.clj b/clojure/src/step3_env.clj index 7358b49..cb634ff 100644 --- a/clojure/src/step3_env.clj +++ b/clojure/src/step3_env.clj @@ -57,11 +57,10 @@ [strng] (PRINT (EVAL (READ strng) repl-env))) -(defn _ref [k,v] (env/env-set repl-env k v)) -(_ref '+ +) -(_ref '- -) -(_ref '* *) -(_ref '/ /) +(env/env-set repl-env '+ +) +(env/env-set repl-env '- -) +(env/env-set repl-env '* *) +(env/env-set repl-env '/ /) (defn -main [& args] |
