From 0a34e22a9895663a47b15d04647f6811803126ee Mon Sep 17 00:00:00 2001 From: Scott Richmond Date: Tue, 5 Apr 2022 19:09:22 -0400 Subject: [PATCH] Remove debug pps --- src/ludus/parser.clj | 5 ----- 1 file changed, 5 deletions(-) diff --git a/src/ludus/parser.clj b/src/ludus/parser.clj index 3c871d2..00822ef 100644 --- a/src/ludus/parser.clj +++ b/src/ludus/parser.clj @@ -542,14 +542,9 @@ (let [first (advance parser)] (loop [parser first exprs []] - (println "parsing do") - (pp/pprint parser) - (pp/pprint exprs) (let [expr (parse-expr parser) expr+newline (accept ::token/newline expr) next (token-type expr+newline)] - (println "current ast " (::ast expr)) - (println "next token " next) (if (= ::token/pipeline next) (recur (advance expr+newline) (conj exprs (::ast expr))) (assoc expr ::ast {::ast/type ::ast/pipeline