diff --git a/src/ikarus.boot b/src/ikarus.boot
index 2890986..f1382e6 100644
Binary files a/src/ikarus.boot and b/src/ikarus.boot differ
diff --git a/src/ikarus.fasl.ss b/src/ikarus.fasl.ss
index 81c3312..bb6025b 100644
--- a/src/ikarus.fasl.ss
+++ b/src/ikarus.fasl.ss
@@ -244,7 +244,7 @@
 
 (library (ikarus fasl read)
   (export)
-  (import (scheme))
+  (import )
 
   (define who 'fasl-read)
   (define (assert-eq? x y)
diff --git a/src/ikarus.fixnums.ss b/src/ikarus.fixnums.ss
index 67b3502..27b04e8 100644
--- a/src/ikarus.fixnums.ss
+++ b/src/ikarus.fixnums.ss
@@ -4,11 +4,9 @@
           fxremainder fxmodulo fxlogor fxlogand fxlogxor fxsll fxsra
           fx= fx< fx<= fx> fx>= fixnum->string)
   (import 
-    (only (scheme) $fxadd1 $fxsub1 $fxlognot $fxzero? $fxquotient
-          $fxmodulo $fx+ $fx- $fx* $fxlogor $fxlogand $fxlogxor
-          $fxsll $fxsra $fx= $fx< $fx<= $fx> $fx>=
-          $string-set!
-          $char->fixnum $fixnum->char)
+    (ikarus system $fx)
+    (ikarus system $chars)
+    (ikarus system $strings)
     (except (ikarus) fxzero? fxadd1 fxsub1 fxlognot fx+ fx- fx*
             fxquotient fxremainder fxmodulo fxlogor fxlogand
             fxlogxor fxsll fxsra fx= fx< fx<= fx> fx>=