streams: pipe streams not needed if we have fork.

* stream.c (se_pclose, make_pipe_stream): define only if
!HAVE_FORK_STUFF.
(pipe_close): Don't call se_pclose in HAVE_FORK_STUFF build.
The pipe_ops are no longer shared between popen pipes and
open-process pipes.

* stream.h (make_pipe_stream): Conditionally declare.

1 files changed, 2 insertions, 0 deletions

diff --git a/stream.h b/stream.h
index adf7cb7e..4c2f6a0e 100644
--- a/stream.h
+++ b/stream.h
@@ -166,7 +166,9 @@ val errno_to_string(val err);
 val make_null_stream(void);
 val make_stdio_stream(FILE *, val descr);
 val make_tail_stream(FILE *, val descr);
+#if !HAVE_FORK_STUFF
 val make_pipe_stream(FILE *, val descr);
+#endif
 val stream_fd(val stream);
 #if HAVE_SOCKETS
 val make_sock_stream(FILE *f, val family, val type);