Comment out testing

This commit is contained in:
Scott Richmond 2022-04-05 20:31:46 -04:00
parent d8e8a1b17e
commit e6419f6b6a

View File

@ -282,17 +282,13 @@
(defn interpret [parsed] (defn interpret [parsed]
(interpret-ast (::parser/ast parsed) {})) (interpret-ast (::parser/ast parsed) {}))
(do (comment
(def source " (def source "
fn square (x) -> mult (x, x) fn square (x) -> mult (x, x)
do 12 let foo = square (_)
> square
> div (_, 2)
> inc
> print
") ")