New function: iterable.

* eval.c (eval_init): Register iterable intrinsic.

* lib.c (seq_iterable): New static function.
(nullify): Use seq_iterable to simplify function.
(iterable): New function.

* lib.h (iterable): Declared.

* txr.1: Documented.

1 files changed, 1 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index 84de4c4b..e50ba931 100644
--- a/lib.h
+++ b/lib.h
@@ -619,6 +619,7 @@ val tolist(val seq);
 val nullify(val obj);
 val empty(val seq);
 val seqp(val obj);
+val iterable(val obj);
 val list_seq(val seq);
 val vec_seq(val seq);
 val str_seq(val seq);