diff --git a/src/ludus/interpreter.cljc b/src/ludus/interpreter.cljc index 7d8fa28..ed0cca9 100644 --- a/src/ludus/interpreter.cljc +++ b/src/ludus/interpreter.cljc @@ -428,7 +428,7 @@ (not (= 1 length)) (throw (ex-info "Called keywords must be unary" {:ast tuple})) - (partial? tuple) + (partial? members) (throw (ex-info "Called keywords may not be partially applied" {:ast tuple})) :else diff --git a/src/ludus/node.cljc b/src/ludus/node.cljc index d63f27a..3c91609 100644 --- a/src/ludus/node.cljc +++ b/src/ludus/node.cljc @@ -61,7 +61,7 @@ (comment (def source " - a b c + :a (_) ")