* stream.c (stream_init): Register make_catenated_stream in

a different form as cat-streams.

* txr.1: Document cat-streams.

* tl.vim, txr.vim: Regenerated.

1 files changed, 1 insertions, 1 deletions

diff --git a/stream.c b/stream.c
index fa274c51..c4632344 100644
--- a/stream.c
+++ b/stream.c
@@ -2621,7 +2621,7 @@ void stream_init(void)
   reg_fun(intern(lit("stream-set-prop"), user_package), func_n3(stream_set_prop));
   reg_fun(intern(lit("stream-get-prop"), user_package), func_n2(stream_get_prop));
   reg_fun(intern(lit("make-catenated-stream"), user_package), func_n0v(make_catenated_stream));
-
+  reg_fun(intern(lit("cat-streams"), user_package), func_n1(make_catenated_stream));
   reg_fun(intern(lit("open-directory"), user_package), func_n1(open_directory));
   reg_fun(intern(lit("open-file"), user_package), func_n2o(open_file, 1));
   reg_fun(intern(lit("open-tail"), user_package), func_n3o(open_tail, 1));