summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2021-04-16 18:03:04 +0530
committerArun Isaac2021-04-16 18:03:04 +0530
commit05dad5a602e18dfa1625f1cf2f8f97768bff363e (patch)
treef0e399ebcff96f3eec2fa17f171aad1d595833ad
parent72ca23f8385f1d425774e204dd7aa56b765c9a18 (diff)
downloadccwl-05dad5a602e18dfa1625f1cf2f8f97768bff363e.tar.gz
ccwl-05dad5a602e18dfa1625f1cf2f8f97768bff363e.tar.lz
ccwl-05dad5a602e18dfa1625f1cf2f8f97768bff363e.zip
Make unary-keywords argument of group-keyword-arguments optional.
* ccwl/utils.scm (group-keyword-arguments): Make unary-keywords optional.
-rw-r--r--ccwl/utils.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/ccwl/utils.scm b/ccwl/utils.scm
index 8f6692c..176715b 100644
--- a/ccwl/utils.scm
+++ b/ccwl/utils.scm
@@ -5,7 +5,7 @@
#:use-module (ice-9 match)
#:export (group-arguments))
-(define (group-keyword-arguments args unary-keywords)
+(define* (group-keyword-arguments args #:optional (unary-keywords (list)))
"Group ARGS, a list of keyword arguments of arbitrary arity. Return
a list of unary keyword arguments. n-ary arguments are grouped
together into lists. Keywords that are to be treated as having unit