~ chicken-core (chicken-5) 44a51b027d2d7acf0a38e476e900d7ec50d0cfe9

commit 44a51b027d2d7acf0a38e476e900d7ec50d0cfe9
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri May 20 07:35:41 2011 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri May 20 07:35:41 2011 +0200

    incorrect rewrites for fixnum even?/odd?

diff --git a/c-platform.scm b/c-platform.scm
index a815e1cb..2dbd0e1f 100644
--- a/c-platform.scm
+++ b/c-platform.scm
@@ -818,8 +818,8 @@
 (rewrite 'even? 17 1 "C_i_evenp" "C_u_i_evenp")
 (rewrite 'odd? 17 1 "C_i_oddp" "C_u_i_oddp")
 
-(rewrite 'fxodd? 2 1 "C_fixnumoddp" #t)
-(rewrite 'fxeven? 2 1 "C_fixnumevenp" #t)
+(rewrite 'fxodd? 2 1 "C_i_fixnumoddp" #t)
+(rewrite 'fxeven? 2 1 "C_i_fixnumevenp" #t)
 
 (rewrite 'floor 15 'flonum 'fixnum 'fpfloor #f)
 (rewrite 'ceiling 15 'flonum 'fixnum 'fpceiling #f)