* stream.c (make_stdio_stream_common): Initialize new

mode member of struct stdio_ops to nil.

1 files changed, 1 insertions, 0 deletions

diff --git a/stream.c b/stream.c
index c90d4c18..41876d85 100644
--- a/stream.c
+++ b/stream.c
@@ -873,6 +873,7 @@ static val make_stdio_stream_common(FILE *f, val descr, struct cobj_ops *ops)
   val stream = cobj((mem_t *) h, stream_s, ops);
   h->f = f;
   h->descr = descr;
+  h->mode = nil;
   utf8_decoder_init(&h->ud);
   h->pid = 0;
   return stream;