diff options
Diffstat (limited to '')
-rw-r--r-- | src/lux/analyser.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lux/analyser.clj b/src/lux/analyser.clj index a4c1a3836..1497a990f 100644 --- a/src/lux/analyser.clj +++ b/src/lux/analyser.clj @@ -403,13 +403,13 @@ [["Form" ["Cons" [?fn ?args]]]] (fn [state] - (prn '(&/show-ast ?fn) (&/show-ast ?fn)) + ;; (prn '(&/show-ast ?fn) (&/show-ast ?fn)) (matchv ::M/objects [((&&/analyse-1 (analyse-ast eval!) ?fn) state)] [["Right" [state* =fn]]] ((&&lux/analyse-apply (analyse-ast eval!) =fn ?args) state*) [_] - (do (prn 'analyse-ast/token (aget token 0) (&/show-state state)) + (do ;; (prn 'analyse-ast/token (aget token 0) (&/show-state state)) ((analyse-basic-ast (analyse-ast eval!) eval! token) state)))) [_] |