kiss-lang/kiss
1
0
Fork 0
Code Issues 6 Pull Requests Actions Packages Projects Releases Wiki Activity

make (defnew) binding list optional

Browse Source
This commit is contained in:
Nat Quayle Nelson
2021-06-22 19:05:06 -06:00
parent 580b10bd79
commit 8688b371a2
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/kiss/Macros.hx
View File

@@ -546,10 +546,14 @@ class Macros {
// TODO test defnew
macros["defnew"] = (wholeExp:ReaderExp, exps:Array<ReaderExp>, k:KissState) -> {
wholeExp.checkNumArgs(2, null, "(defnew [[args...]] [[property bindings...]] [body...]");
wholeExp.checkNumArgs(1, null, "(defnew [[args...]] [[optional property bindings...]] [optional body...]");
var args = exps[0];
var bindingList = exps[1].bindingList("defnew", true);
var bindingList = if (exps.length > 1) {
exps[1].bindingList("defnew", true);
} else {
[];
};
var bindingPairs = Prelude.groups(bindingList, 2);
var propertyDefs = [for (bindingPair in bindingPairs) {