~ chicken-core (chicken-5) 7ac10a2fb9b04d114af97d8c9918bffae38cc534

commit 7ac10a2fb9b04d114af97d8c9918bffae38cc534
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Tue Sep 21 08:11:37 2010 -0400
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Tue Sep 21 08:11:37 2010 -0400

    I'm a stupid arse and I don't deserve any better

diff --git a/library.scm b/library.scm
index bb738448..da124651 100644
--- a/library.scm
+++ b/library.scm
@@ -209,7 +209,7 @@ EOF
 (define (##sys#message str) (##core#inline "C_message" str))
 (define (##sys#byte x i) (##core#inline "C_subbyte" x i))
 (define (##sys#setbyte x i n) (##core#inline "C_setbyte" x i n))
-(define (##sys#void) (##core#undefined))
+(define (##sys#void . _) (##core#undefined))
 (define void ##sys#void)
 (define ##sys#undefined-value (##core#undefined))
 (define (##sys#halt) (##core#inline "C_halt" #f))