From 22e805300d837b87b885ecaa4c81d69582cd3f63 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Sun, 24 Oct 2010 06:27:02 +0000 Subject: [PATCH] Omit procedure arity check in HASH-TABLE/MODIFY!. This causes problems in the cold load, and doesn't enhance the safety of the relevant code. It only marginally increases the debuggability of the mistake it catches. --- src/runtime/hashtb.scm | 1 - 1 file changed, 1 deletion(-) diff --git a/src/runtime/hashtb.scm b/src/runtime/hashtb.scm index 97481d412..bf24d3c38 100644 --- a/src/runtime/hashtb.scm +++ b/src/runtime/hashtb.scm @@ -137,7 +137,6 @@ USA. (define (hash-table/modify! table key procedure default) (guarantee-hash-table table 'HASH-TABLE/MODIFY!) - (guarantee-procedure-of-arity procedure 1 'HASH-TABLE/MODIFY!) ((table-type-method:modify! (table-type table)) table key procedure default)) (define (hash-table/intern! table key get-datum) -- 2.25.1