diff --git a/src/ikarus.boot b/src/ikarus.boot index ba3c029..a39adde 100644 Binary files a/src/ikarus.boot and b/src/ikarus.boot differ diff --git a/src/ikarus.io.input-files.ss b/src/ikarus.io.input-files.ss index 68cdca3..69bf2ca 100644 --- a/src/ikarus.io.input-files.ss +++ b/src/ikarus.io.input-files.ss @@ -3,10 +3,11 @@ (export open-input-file current-input-port console-input-port with-input-from-file call-with-input-file) (import - (only (scheme) $set-port-input-size! $set-port-input-index! - $string-ref $string-set! $port-input-buffer $port-input-size - $port-input-index $peek-char $read-char - $fx= $fx< $fx> $fx>= $fxadd1 $fxsub1) + (ikarus system $ports) + (ikarus system $io) + (ikarus system $fx) + (ikarus system $strings) + (ikarus system $chars) (except (ikarus) open-input-file current-input-port console-input-port with-input-from-file call-with-input-file