~ chicken-r7rs (master) c9f30252835cc26056254b6e47da7307fd768e1c

commit c9f30252835cc26056254b6e47da7307fd768e1c
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Sat Oct 26 02:13:05 2013 +0000
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Sat Oct 26 02:13:05 2013 +0000

    Add missing obj param to list-set!'s type signature

diff --git a/scheme.base.scm b/scheme.base.scm
index 8f558d6..7020311 100644
--- a/scheme.base.scm
+++ b/scheme.base.scm
@@ -172,7 +172,7 @@
       (error 'list-tail "out of range"))))
 
 
-(: list-set! (list fixnum -> undefined))
+(: list-set! (list fixnum * -> undefined))
 
 (define (list-set! l n obj)
   (##sys#check-integer n 'list-set!)