summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGary Houston <ghouston@arglist.com>2000-11-09 22:46:07 +0000
committerGary Houston <ghouston@arglist.com>2000-11-09 22:46:07 +0000
commita9c632a2f3d043d7e1effc78de31822c823d1e8e (patch)
treeaf9387deb0995f06131ed3e79cc37d56d58c2424
parentb875c46853e6f25c43eb76b277f3b0fa92254699 (diff)
downloadguile-a9c632a2f3d043d7e1effc78de31822c823d1e8e.tar.gz
2000-11-07 Gary Houston <ghouston@arglist.com>
* popen.scm (open-output-pipe): added docstrings for open-input-pipe and open-output-pipe.
-rw-r--r--ice-9/ChangeLog5
-rw-r--r--ice-9/popen.scm9
2 files changed, 12 insertions, 2 deletions
diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index bc2abc993..4661db3f7 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,8 @@
+2000-11-07 Gary Houston <ghouston@arglist.com>
+
+ * popen.scm (open-output-pipe): added docstrings for open-input-pipe
+ and open-output-pipe.
+
2000-11-06 Gary Houston <ghouston@arglist.com>
* popen.scm (open-process): bug fix: don't use
diff --git a/ice-9/popen.scm b/ice-9/popen.scm
index 874477ba5..eca3dfe26 100644
--- a/ice-9/popen.scm
+++ b/ice-9/popen.scm
@@ -152,5 +152,10 @@ information on how to interpret this value."
(add-hook! after-gc-hook reap-pipes)
-(define-public (open-input-pipe command) (open-pipe command OPEN_READ))
-(define-public (open-output-pipe command) (open-pipe command OPEN_WRITE))
+(define-public (open-input-pipe command)
+ "Equivalent to @code{open-pipe} with mode @code{OPEN_READ}"
+ (open-pipe command OPEN_READ))
+
+(define-public (open-output-pipe command)
+ "Equivalent to @code{open-pipe} with mode @code{OPEN_WRITE}"
+ (open-pipe command OPEN_WRITE))