dropping input-port-byte-position from (ikarus)'s exports.

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

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

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))

scheme/last-revision

@@ -1 +1 @@
-1507
+1509

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]