diff --git a/src/c/file.d b/src/c/file.d index 67ff6a4aa..5bd07b92f 100755 --- a/src/c/file.d +++ b/src/c/file.d @@ -2011,11 +2011,7 @@ const struct ecl_file_ops broadcast_ops = { streams = CONS(x, streams); } x = alloc_stream(); - if (Null(streams)) { - x->stream.format = @':pass-through'; - } else { - x->stream.format = cl_stream_external_format(ECL_CONS_CAR(streams)); - } + x->stream.format = @':default'; x->stream.ops = duplicate_dispatch_table(&broadcast_ops); x->stream.mode = (short)smm_broadcast; BROADCAST_STREAM_LIST(x) = cl_nreverse(streams);