Convert mapping functions to new iterators.

* eval.c (get_iter_f): Renamed to iter_from_binding_f.
(iter_begin_f, iter_more_f, iter_item_f, iter_step_f): New
global variables.
(op_each): Follow rename of get_iter_f.
(mapcarv, mappendv, lazy_mapcar_func, lazy_mapcar,
lazy_mapcarv_func, lazy_mapcarv, mapdov, prod_common):
Convert from car/cdr/null-test iteration to iter-begin.
(eval_init): gc-protect and initialize new variables.

* lib.c (mapcar_listout, mappend, mapdo): Convert to seq_iter
iteration. List argument renamed to seq.
(mapcar): List argument renamed to seq.

* lib.h: Declarations updated with renamed arguments.

1 files changed, 4 insertions, 4 deletions

diff --git a/lib.h b/lib.h
index 3463969b..9eb0510b 100644
--- a/lib.h
+++ b/lib.h
@@ -1108,11 +1108,11 @@ val alist_nremove1(val list, val key);
 val copy_cons(val cons);
 val copy_tree(val tree);
 val copy_alist(val list);
-val mapcar_listout(val fun, val list);
-val mapcar(val fun, val list);
+val mapcar_listout(val fun, val seq);
+val mapcar(val fun, val seq);
 val mapcon(val fun, val list);
-val mappend(val fun, val list);
-val mapdo(val fun, val list);
+val mappend(val fun, val seq);
+val mapdo(val fun, val seq);
 val window_map(val range, val boundary, val fun, val seq);
 val window_mappend(val range, val boundary, val fun, val seq);
 val window_mapdo(val range, val boundary, val fun, val seq);