From 8a4da0fbae43592f6afd739ecab9a885bde2ba1b Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sun, 16 Jan 2022 12:20:45 +0530
Subject: 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".
---
 ccwl/utils.scm  | 4 ++--
 tests/utils.scm | 4 ++--
 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)))
-- 
cgit v1.2.3