summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2022-01-16 12:20:45 +0530
committerArun Isaac2022-01-16 12:25:16 +0530
commit8a4da0fbae43592f6afd739ecab9a885bde2ba1b (patch)
treeb0100785b6ae5bdd2858d179852d9f6ebbbc170a
parentfa44bd5c81bf6cbc357abe613e9fdf5c3a0f81dd (diff)
downloadccwl-8a4da0fbae43592f6afd739ecab9a885bde2ba1b.tar.gz
ccwl-8a4da0fbae43592f6afd739ecab9a885bde2ba1b.tar.lz
ccwl-8a4da0fbae43592f6afd739ecab9a885bde2ba1b.zip
ccwl: Clarify default default value of lambda**.
* ccwl/utils.scm (lambda**): Change "default value" to "default default value" in docstring. * tests/utils.scm ("default value of lambda** unary argument should be #f", "default value of lambda** n-ary argument should be the empty list"): Change "default value" to "default default value".
-rw-r--r--ccwl/utils.scm4
-rw-r--r--tests/utils.scm4
2 files changed, 4 insertions, 4 deletions
diff --git a/ccwl/utils.scm b/ccwl/utils.scm
index 090f857..db74c7f 100644
--- a/ccwl/utils.scm
+++ b/ccwl/utils.scm
@@ -150,8 +150,8 @@ for example, be invoked as:
=> (1 2 123 (1 2 3))
lambda** also supports default values for both unary and n-ary keyword
-arguments. Note that the default value for unary arguments is #f,
-while that for n-ary arguments is the empty list. For example,
+arguments. Note that the default default value for unary arguments is
+#f, while that for n-ary arguments is the empty list. For example,
((lambda** (foo bar #:key aal vale (pal 9) #:key* naal (irandu 7) (sol 3 2 1) uruthi)
(list foo bar aal vale pal naal irandu sol uruthi))
diff --git a/tests/utils.scm b/tests/utils.scm
index 6db9fe2..6b14f29 100644
--- a/tests/utils.scm
+++ b/tests/utils.scm
@@ -73,12 +73,12 @@
(list foo aal vale pal naal irandu sol))
1 2 #:vale 123 #:naal 321 456))
-(test-equal "default value of lambda** unary argument should be #f"
+(test-equal "default default value of lambda** unary argument should be #f"
#f
((lambda** (#:key foo)
foo)))
-(test-equal "default value of lambda** n-ary argument should be the empty list"
+(test-equal "default default value of lambda** n-ary argument should be the empty list"
'()
((lambda** (#:key* foo)
foo)))