diff --git a/src/ikarus.boot b/src/ikarus.boot
index ef634a9..e524a8b 100644
Binary files a/src/ikarus.boot and b/src/ikarus.boot differ
diff --git a/src/ikarus.chars.ss b/src/ikarus.chars.ss
index e8ca7bb..666aa85 100644
--- a/src/ikarus.chars.ss
+++ b/src/ikarus.chars.ss
@@ -8,9 +8,9 @@
       char=? char<? char<=? char>? char>=?
       integer->char char->integer
       char-whitespace? char-alphabetic? char-downcase)
-    (only (scheme) 
-          $car $cdr $fx+ $fx- $fx<= $fx>= $fixnum->char $char->fixnum
-          $char= $char< $char<= $char> $char>=))
+    (ikarus system $pairs)
+    (ikarus system $chars)
+    (ikarus system $fx))
 
   (define integer->char
     (lambda (n)