diff --git a/scheme/ikarus.boot.prebuilt b/scheme/ikarus.boot.prebuilt
index a994380..50ade9b 100644
Binary files a/scheme/ikarus.boot.prebuilt and b/scheme/ikarus.boot.prebuilt differ
diff --git a/scheme/ikarus.io.ss b/scheme/ikarus.io.ss
index c8ff022..353ae5c 100644
--- a/scheme/ikarus.io.ss
+++ b/scheme/ikarus.io.ss
@@ -14,7 +14,7 @@
 ;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
 
-(library (io-spec) 
+(library (ikarus.io) 
   
   (export 
     port? input-port? output-port? textual-port? binary-port?
@@ -120,7 +120,6 @@
       reset-input-port!
       reset-output-port!
       port-id
-      input-port-byte-position
       process process-nonblocking
       tcp-connect tcp-connect-nonblocking
       udp-connect udp-connect-nonblocking
diff --git a/scheme/ikarus.reader.annotated.ss b/scheme/ikarus.reader.annotated.ss
index d70e7cd..cfa357c 100644
--- a/scheme/ikarus.reader.annotated.ss
+++ b/scheme/ikarus.reader.annotated.ss
@@ -19,7 +19,7 @@
   (import
     (except (ikarus) read-annotated read-script-annotated)
     (only (ikarus.reader) read-annotated read-script-annotated)
-    (only (io-spec) open-string-input-port/id))
+    (only (ikarus.io) open-string-input-port/id))
 
   (define (annotated-port file-name)
     (open-string-input-port/id
diff --git a/scheme/ikarus.reader.ss b/scheme/ikarus.reader.ss
index cc3ce06..ff562ae 100644
--- a/scheme/ikarus.reader.ss
+++ b/scheme/ikarus.reader.ss
@@ -25,7 +25,7 @@
     (ikarus system $fx)
     (ikarus system $pairs)
     (ikarus system $bytevectors)
-    ;(only (ikarus unicode-data) unicode-printable-char?)
+    (only (ikarus.io) input-port-byte-position)
     (except (ikarus) read-char read read-token comment-handler get-datum
       read-annotated read-script-annotated annotation?
       annotation-expression annotation-source annotation-stripped))
diff --git a/scheme/last-revision b/scheme/last-revision
index a222952..4990204 100644
--- a/scheme/last-revision
+++ b/scheme/last-revision
@@ -1 +1 @@
-1507
+1509
diff --git a/scheme/makefile.ss b/scheme/makefile.ss
index 8499fe9..b6a1e25 100755
--- a/scheme/makefile.ss
+++ b/scheme/makefile.ss
@@ -1343,7 +1343,6 @@
     [$set-port-attrs!     $io]
     [$port-position       $io]
     [$set-port-position!  $io]
-    [input-port-byte-position   i]
     ;;;
     [&condition-rtd]
     [&condition-rcd]