~ chicken-core (chicken-5) 7b82981dcff8993395fbf6064d36dce5c3a70f69
commit 7b82981dcff8993395fbf6064d36dce5c3a70f69 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Sun Sep 19 00:15:01 2010 +0200 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Sun Sep 19 00:15:01 2010 +0200 fixed srfi-69 tests diff --git a/tests/hash-table-tests.scm b/tests/hash-table-tests.scm index 8f0f62be..524c40de 100644 --- a/tests/hash-table-tests.scm +++ b/tests/hash-table-tests.scm @@ -55,7 +55,7 @@ (assert (eq? (hash-table-ref ht 23.0) 'bar)) (print "HT - Insert with update!") -(hash-table-update! ht 'baz) +(hash-table-update! ht 'baz identity (lambda () 'foo)) (assert (eq? (hash-table-ref ht 'baz) 'foo)) (assert (= (hash-table-size ht) 2))Trap