From deee9dd09b3f6f8c6c36b145886fa4acd81143be Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Wed, 29 May 2019 04:11:52 +0000 Subject: [PATCH] Fix check for arity of hash: must be binary, not unary. (cherry picked from commit aec466572291046f0dde041eb29a8330ffc7ab8f) --- src/runtime/hash-table.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/runtime/hash-table.scm b/src/runtime/hash-table.scm index 4e2a9e615..83fe31875 100644 --- a/src/runtime/hash-table.scm +++ b/src/runtime/hash-table.scm @@ -1025,7 +1025,7 @@ USA. (define-deferred hash-table-type-options (keyword-option-parser - (list (list 'hash-function unary-procedure? default-object) + (list (list 'hash-function binary-procedure? default-object) (list 'rehash-after-gc? boolean? default-object) (list 'entry-type entry-type-name? (lambda () 'strong))))) -- 2.25.1