add #:version (6) to rnrs bytevectors and ports

* module/rnrs/bytevectors.scm:
* module/rnrs/io/ports.scm: Add #:version (6) to these modules.

* module/6/rnrs.scm: Add versions to the import specs for bytevectors
  and ports.

diff --git a/module/6/rnrs.scm b/module/6/rnrs.scm
index 8fb83e1..83fad98 100644 (file)
--- a/module/6/rnrs.scm
+++ b/module/6/rnrs.scm
@@ -218,8 +218,8 @@
          (rnrs arithmetic flonums (6))
          (rnrs base (6))
 
-         (rnrs bytevectors)
-
+         (rnrs bytevectors (6))
+          
          (rnrs conditions (6))
          (rnrs control (6))
          (rnrs enums (6))
@@ -227,7 +227,7 @@
          (rnrs files (6))
          (rnrs hashtables (6))
 
-         (rnrs io ports)
+         (rnrs io ports (6))
 
          (rnrs io simple (6))
          (rnrs lists (6))

diff --git a/module/rnrs/bytevectors.scm b/module/rnrs/bytevectors.scm
index b33afe0..9744359 100644 (file)
--- a/module/rnrs/bytevectors.scm
+++ b/module/rnrs/bytevectors.scm
@@ -29,6 +29,7 @@
 ;;; Code:
 
 (define-module (rnrs bytevectors)
+  #:version (6)
   #:export-syntax (endianness)
   #:export (native-endianness bytevector?
            make-bytevector bytevector-length bytevector=? bytevector-fill!

diff --git a/module/rnrs/io/ports.scm b/module/rnrs/io/ports.scm
index 17d4907..89dc265 100644 (file)
--- a/module/rnrs/io/ports.scm
+++ b/module/rnrs/io/ports.scm
@@ -27,8 +27,9 @@
 ;;; Code:
 
 (define-module (rnrs io ports)
-  :re-export (eof-object? port? input-port? output-port?)
-  :export (eof-object
+  #:version (6)
+  #:re-export (eof-object? port? input-port? output-port?)
+  #:export (eof-object
 
            ;; input & output ports
            port-transcoder binary-port? transcoded-port