New functions: list-seq, ved-seq and str-seq.

These functions convert any iterable to a list, vector or
string.

* eval.c (eval_init): Registered list-seq, vec-seq and str-seq
intrinsics.

* lib.c (list_seq, vec_seq, str_seq): New functions.

* lib.h (list_seq, vec_seq, str_seq): Declared.

* txr.1: Documented.

1 files changed, 3 insertions, 0 deletions

diff --git a/eval.c b/eval.c
index 405851f1..cd282da0 100644
--- a/eval.c
+++ b/eval.c
@@ -6926,6 +6926,9 @@ void eval_init(void)
   reg_fun(intern(lit("uni"), user_package), func_n4o(uni, 2));
 
   reg_fun(intern(lit("seqp"), user_package), func_n1(seqp));
+  reg_fun(intern(lit("list-seq"), user_package), func_n1(list_seq));
+  reg_fun(intern(lit("vec-seq"), user_package), func_n1(vec_seq));
+  reg_fun(intern(lit("str-seq"), user_package), func_n1(str_seq));
   reg_fun(intern(lit("length"), user_package), length_f);
   reg_fun(intern(lit("len"), user_package), length_f);
   reg_fun(intern(lit("empty"), user_package), func_n1(empty));