summaryrefslogtreecommitdiff
path: root/test-suite/tests/srfi-69.test
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/tests/srfi-69.test')
-rw-r--r--test-suite/tests/srfi-69.test3
1 files changed, 3 insertions, 0 deletions
diff --git a/test-suite/tests/srfi-69.test b/test-suite/tests/srfi-69.test
index 7f1fa4471..1d240d28c 100644
--- a/test-suite/tests/srfi-69.test
+++ b/test-suite/tests/srfi-69.test
@@ -102,4 +102,7 @@ case-insensitive strings to `equal?'-tested values."
(and (= 1 (hash-table-size ht))
(lset= equal? '((b . 53)) (hash-table->alist ht)))))
+ (pass-if "can use all arguments, including size"
+ (hash-table? (make-hash-table equal? hash #:weak 'key 31)))
+
)