[Guile-commits] 04/05: Document call-with-port

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit b2b1666d4c634f79a0116786ab32e95e2c9858df
Author: Andy Wingo <wingo@pobox.com>
AuthorDate: Tue Jan 12 12:21:15 2021 +0100

    Document call-with-port
    
    * doc/ref/api-io.texi (Ports): Add docs.
    * doc/ref/r6rs.texi (rnrs io ports): Remove docs.
---
 doc/ref/api-io.texi | 7 ++++++-
 doc/ref/r6rs.texi   | 8 ++------
 2 files changed, 8 insertions(+), 7 deletions(-)

diff --git a/doc/ref/api-io.texi b/doc/ref/api-io.texi
index ecbd355..5029605 100644
--- a/doc/ref/api-io.texi
+++ b/doc/ref/api-io.texi
@@ -1,7 +1,7 @@
 @c -*-texinfo-*-
 @c This is part of the GNU Guile Reference Manual.
 @c Copyright (C)  1996, 1997, 2000, 2001, 2002, 2003, 2004, 2007, 2009,
-@c   2010, 2011, 2013, 2016, 2019  Free Software Foundation, Inc.
+@c   2010, 2011, 2013, 2016, 2019, 2021  Free Software Foundation, Inc.
 @c See the file guile.texi for copying conditions.
 
 @node Input and Output
@@ -125,6 +125,11 @@ Return @code{#t} if @var{port} is closed or @code{#f} if 
it is
 open.
 @end deffn
 
+@deffn {Scheme Procedure} call-with-port port proc
+Call @var{proc}, passing it @var{port} and closing @var{port} upon exit
+of @var{proc}.  Return the return values of @var{proc}.
+@end deffn
+
 
 @node Binary I/O
 @subsection Binary I/O
diff --git a/doc/ref/r6rs.texi b/doc/ref/r6rs.texi
index e430708..fe969f0 100644
--- a/doc/ref/r6rs.texi
+++ b/doc/ref/r6rs.texi
@@ -1,7 +1,7 @@
 @c -*-texinfo-*-
 @c This is part of the GNU Guile Reference Manual.
 @c Copyright (C)  2010, 2011, 2012, 2013,
-@c   2014, 2019 Free Software Foundation, Inc.
+@c   2014, 2019, 2021 Free Software Foundation, Inc.
 @c See the file guile.texi for copying conditions.
 
 @node R6RS Support
@@ -1683,6 +1683,7 @@ Return the end-of-file (EOF) object.
 @deffn {Scheme Procedure} port? obj
 @deffnx {Scheme Procedure} input-port? obj
 @deffnx {Scheme Procedure} output-port? obj
+@deffnx {Scheme Procedure} call-with-port port proc
 @xref{Ports}, for documentation.
 @end deffn
 
@@ -1751,11 +1752,6 @@ Equivalent to @code{(seek @var{port} @var{offset} 
SEEK_SET)}.
 Return @code{#t} is @var{port} supports @code{set-port-position!}.
 @end deffn
 
-@deffn {Scheme Procedure} call-with-port port proc
-Call @var{proc}, passing it @var{port} and closing @var{port} upon exit
-of @var{proc}.  Return the return values of @var{proc}.
-@end deffn
-
 @deffn {Scheme Procedure} port-eof? input-port
 Equivalent to @code{(eof-object? (lookahead-u8 @var{input-port}))}.
 @end deffn