gzio: support more modes in open-file.

* gzio.c (w_gzopen_mode): Use w_open_mode if available, in order
to support most of the flags (including "x" which Zlib has,
but which we are not passing through).

* stream.c (w_open_mode): New function formed from w_fopen_mode
content.
(w_fopen_mode): Call w_open_mode.

* stream.c (w_open_mode): Declared.

1 files changed, 2 insertions, 0 deletions

diff --git a/gzio.h b/gzio.h
index bbcd1e1a..2f9cf164 100644
--- a/gzio.h
+++ b/gzio.h
@@ -30,4 +30,6 @@ val gzio_stream_s;
 void gzio_init(void);
 gzFile w_gzopen_mode(const wchar_t *wname, const wchar_t *wmode,
                      const struct stdio_mode m, val self);
+gzFile w_gzdopen_mode(int fd, const wchar_t *wmode,
+                      const struct stdio_mode m, val self);
 val make_gzio_stream(gzFile f, int fd, val descr, int is_output);