diff --git a/src/ikarus.boot b/src/ikarus.boot index 33c214f..69b09e4 100644 Binary files a/src/ikarus.boot and b/src/ikarus.boot differ diff --git a/src/ikarus.io-primitives.ss b/src/ikarus.io-primitives.ss index 8e510a4..282135c 100644 --- a/src/ikarus.io-primitives.ss +++ b/src/ikarus.io-primitives.ss @@ -5,9 +5,8 @@ close-input-port reset-input-port! flush-output-port close-output-port) (import - (only (scheme) $write-char $flush-output-port $port-handler - $read-char $unread-char $peek-char $write-char - $reset-input-port! $close-input-port $close-output-port) + (ikarus system $io) + (ikarus system $ports) (except (ikarus) read-char unread-char peek-char write-char newline port-name input-port-name output-port-name close-input-port reset-input-port! flush-output-port