bugfix: missing gzip support in open-command.

* stream.c (pipe_close_status_helper): New function,
factored out of pipe_close and used by it, and
also by gzio_close.
(pipe_close): Call pipe_close, which now contains
the classification of process wait status codes.
(open_fileno): Now takes optional pid argument.
If this specified, then make_pipevp_stream is used.
(open_subprocess): Use the open_fileno function, rather than
fopen. This simplifies things too, except that we have to
catch exception.  Pass pid to the newly added parameter of
open_fileno so that we obtain a proper pipe stream that will
wait for the process to terminate when closed.
(mkstemp_wrap): Pass nil for pid argument of open_fileno.
(stream_init): Update registration of open-fileno.

* gzio.c (struct gzio_handle): New member, pid.
(gzio_close): If there is a nonzero pid, wait for the
process to terminate.
(make_gzio_stream): Initialize h->pid to zero.
(make_gzio_pipe_stream): New function.

* parser.c (lino_fdopen): Pass nil for pid argument
of open_fileno.

* gzio.h (make_gzio_pipe_stream): Declared.

* tests/018/gzip.tl: New test.

1 files changed, 1 insertions, 1 deletions

diff --git a/parser.c b/parser.c
index 1a375bd7..1ed3ca78 100644
--- a/parser.c
+++ b/parser.c
@@ -1947,7 +1947,7 @@ static mem_t *lino_open8(const char *name_in, lino_file_mode_t mode_in)
 static mem_t *lino_fdopen(int fd, lino_file_mode_t mode_in)
 {
   val mode = static_str(lino_mode_str[mode_in]);
-  return coerce(mem_t *, open_fileno(num(fd), mode));
+  return coerce(mem_t *, open_fileno(num(fd), mode, nil));
 }
 
 static void lino_close(mem_t *stream)