diff --git a/src/ludus/interpreter_new.clj b/src/ludus/interpreter_new.clj index cba232c..174531e 100644 --- a/src/ludus/interpreter_new.clj +++ b/src/ludus/interpreter_new.clj @@ -5,7 +5,7 @@ [ludus.scanner :as s])) (def source - "(1 2) + "(1, 2) " ) diff --git a/src/ludus/turtle-graphics.clj b/temp/turtle-graphics.clj similarity index 97% rename from src/ludus/turtle-graphics.clj rename to temp/turtle-graphics.clj index cd6f192..c698752 100644 --- a/src/ludus/turtle-graphics.clj +++ b/temp/turtle-graphics.clj @@ -36,7 +36,7 @@ heading (:heading prev) unit (heading->vec heading) move (scale unit steps) - curr (update prev :postion #(add % move))] + curr (update prev :postion #(add % move))] (swap! path #(conj % curr)))) (defn back [steps] (forward (* -1 steps)))