From 0b6deefd5d220378a370fd3e20fec9623fdd955e Mon Sep 17 00:00:00 2001 From: Scott Richmond Date: Mon, 18 Dec 2023 00:23:06 -0500 Subject: [PATCH 1/2] Bump version --- package.json | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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": {}, From 3a50910e3ddd8847a53ccb472e6f3f5edbe0f76e Mon Sep 17 00:00:00 2001 From: Scott Richmond Date: Mon, 18 Dec 2023 00:42:44 -0500 Subject: [PATCH 2/2] Fix bug where partially applied called keyword returns nil --- src/ludus/interpreter.cljc | 2 +- src/ludus/node.cljc | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) 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 (_) ")