~ chicken-core (chicken-5) 44642e752a1b996006007e5e7a88e87a00a393ac

commit 44642e752a1b996006007e5e7a88e87a00a393ac
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Wed May 11 05:15:13 2011 -0400
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Wed May 11 05:15:13 2011 -0400

    argument-count mismatch (found by scrutiny)

diff --git a/csi.scm b/csi.scm
index 6527e2d3..349084f1 100644
--- a/csi.scm
+++ b/csi.scm
@@ -727,7 +727,7 @@ EOF
       (##sys#void) ) ) )
 
 (define (set-describer! tag proc)
-  (##sys#check-symbol tag 'symbol 'set-describer!)
+  (##sys#check-symbol tag 'set-describer!)
   (##sys#hash-table-set! describer-table tag proc) )