diff --git a/src/ludus/interpreter.cljc b/src/ludus/interpreter.cljc index ed0cca9..70cb877 100644 --- a/src/ludus/interpreter.cljc +++ b/src/ludus/interpreter.cljc @@ -811,9 +811,9 @@ times (if (= :word (:type times-expr)) (resolve-word times-expr ctx) (-> times-expr :data first)) - block (second data)] + expr (second data)] (if (not (number? times)) (throw (ex-info (str "Repeat needs a number, not a " (base/get-type times)) {}))) - (dotimes [_ times] (interpret-ast block ctx)))) + (dotimes [_ times] (interpret-ast expr ctx)))) (defn- interpret-literal [ast] (-> ast :data first))