mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-29 19:30:36 +02:00
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.
This commit is contained in:
parent
4255e79fda
commit
c08adae460
3 changed files with 7 additions and 5 deletions
|
@ -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))
|
||||
|
|
|
@ -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!
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue