1 files changed, 4 insertions, 1 deletions
diff --git a/stream.c b/stream.c
index b34da981..398feaf6 100644
--- a/stream.c
+++ b/stream.c
@@ -2343,9 +2343,12 @@ static struct strm_ops cat_stream_ops =
 val make_catenated_stream(val stream_list)
 {
   struct cat_strm *s = coerce(struct cat_strm *, chk_malloc(sizeof *s));
+  val catstrm = nil;
   strm_base_init(&s->a);
+  s->streams = nil;
+  catstrm = cobj(coerce(mem_t *, s), stream_s, &cat_stream_ops.cobj_ops);
   s->streams = stream_list;
-  return cobj(coerce(mem_t *, s), stream_s, &cat_stream_ops.cobj_ops);
+  return catstrm;
 }
 
 val make_catenated_stream_v(struct args *streams)