summaryrefslogtreecommitdiff
path: root/module/rnrs.scm
diff options
context:
space:
mode:
authorAndreas Rottmann <a.rottmann@gmx.at>2012-11-12 20:47:57 +0100
committerAndreas Rottmann <a.rottmann@gmx.at>2012-11-12 20:47:57 +0100
commit3ae5a02f1d2b85bc54a4ff921da1a904a3915b9c (patch)
tree8687f05f20ed6a61c7751672cac8c3fa0242d391 /module/rnrs.scm
parent5ec8fc21341329e92b9b74ca386a14f1b4672cca (diff)
downloadguile-3ae5a02f1d2b85bc54a4ff921da1a904a3915b9c.tar.gz
Add missing R6RS `open-file-input/output-port' procedure
* module/rnrs/io/port.scm (r6rs-open): New internal helper procedure for opening files. (open-file-input-port, open-file-output-port): Make use of `r6rs-open'. (open-file-input/output-port): Implement in terms of `r6rs-open', add to exported identifiers list. * module/rnrs.scm (open-file-input/output-port): Add to exported identifiers. * test-suite/tests/r6rs-ports.test (test-input-file-opener): New procedure, collects several tests for opening file input ports. ("7.2.7 Input Ports"): Use `test-input-file-opener' for checking `open-file-input-port'. (test-output-file-opener): New procedure, collects several tests for opening file output ports. ("8.2.10 Output ports"): Use `test-output-file-opener' for checking `open-file-output-port'. ("8.2.13 Input/output ports"): New test prefix, making use of both `test-input-file-opener' and `test-output-file-opener' to check `open-file-input/output-port'.
Diffstat (limited to 'module/rnrs.scm')
-rw-r--r--module/rnrs.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/rnrs.scm b/module/rnrs.scm
index 9fff820b3..a132c5364 100644
--- a/module/rnrs.scm
+++ b/module/rnrs.scm
@@ -180,7 +180,7 @@
call-with-bytevector-output-port
call-with-string-output-port
latin-1-codec utf-8-codec utf-16-codec
- open-file-input-port open-file-output-port
+ open-file-input-port open-file-output-port open-file-input/output-port
make-custom-textual-output-port
call-with-string-output-port
flush-output-port put-string