diff options
-rw-r--r-- | ice-9/ChangeLog | 5 | ||||
-rw-r--r-- | ice-9/popen.scm | 9 |
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)) |