1 files changed, 5 insertions, 0 deletions
diff --git a/tests/utils.scm b/tests/utils.scm
index 07e02f8..a123719 100644
--- a/tests/utils.scm
+++ b/tests/utils.scm
@@ -80,6 +80,11 @@
   ((lambda** (#:key* foo)
      foo)))
 
+(test-error "lambda** should error out on unrecognized keywords in arguments" #t
+  (macroexpand
+   '(lambda** (#:key foo #:foo bar)
+      foo)))
+
 (test-assert "syntax-lambda**"
   (equal? (list #'1 #'2 #'123 (list #'1 #'2 #'3))
           ((syntax-lambda** (a b #:key foo #:key* bar)