diff options
| -rw-r--r-- | ccwl/utils.scm | 4 | ||||
| -rw-r--r-- | 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))) |