summary refs log tree commit diff
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)))