diff --git a/package.json b/package.json index 4eeda31..3409c0b 100644 --- a/package.json +++ b/package.json @@ -1,6 +1,6 @@ { "name": "@ludus/ludus-js-pure", - "version": "0.1.0-alpha.7.7", + "version": "0.1.0-alpha.7.8", "description": "A Ludus interpreter in a pure JS function.", "main": "target/js/ludus.js", "directories": {}, 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 (_) ")