internals: rename misnamed curry_* functions.

The various curry_xx_yy functions perform partial application,
not currying. The curry prefix is being renamed to pa
(partially apply).

* lib.c (remq_lazy, remql_lazy, remqual_lazy, tree_Find):
Updated.
(do_curry_12_1, do_curry_12_1_v, do_curry_12_2,
do_curry_123_1, do_curry_123_23, do_curry_123_2,
do_curry_123_3, do_curry_1234_1, do_curry_1234_34):
Renamed to do_pa_12_1, do_pa_12_1_v, do_pa_12_2, do_pa_123_1,
do_pa_123_23, do_pa_123_2, do_pa_123_3, do_pa_1234_1,
do_pa_1234_34.
(curry_12_1, curry_12_1_v, curry_12_2, curry_123_1,
curry_123_23, curry_123_2, curry_123_3, curry_1234_1,
curry_1234_34): Renamed to pa_12_1, pa_12_1_v, pa_12_2,
pa_123_1, pa_123_23, pa_123_2, pa_123_3, pa_1234_1,
pa_1234_34.
(transposev, do_juxt): Updated.

* lib.h: Declarations renamed.

* eval.c (subst_vars, qquote_init, expand_catch, weavev):
Updated.

* filter.c (get_filter, build_filter_from_list,
filter_string_tree, filter_init): Updated.

* match.c (tx_subst_vars, do_txeval, v_freeform, v_bind,
v_throw, v_deffilter, v_assert, h_assert): Updated.

* parser.y (gather_clause): Updated.

* regex.c (regex_range_full_fun, regex_range_left_fun,
regex_range_right_fun, regex_range_search_fun): Updated.

* stream.c (open_files, open_files_star): Updated.

* txr.c (txr_main): Updated.

* unwind.c (me_defex): Updated.

1 files changed, 9 insertions, 9 deletions

diff --git a/lib.h b/lib.h
index 1de96492..dfc73e98 100644
--- a/lib.h
+++ b/lib.h
@@ -992,17 +992,17 @@ val reduce_left(val fun, val list, val init, val key);
 val reduce_right(val fun, val list, val init, val key);
 val transposev(struct args *lists);
 val transpose(val lists);
-/* The notation curry_12_2 means take some function f(arg1, arg2) and
+/* The notation pa_12_2 means take some function f(arg1, arg2) and
    fix a value for argument 1 to create a g(arg2).
    Other variations follow by analogy. */
-val curry_12_2(val fun2, val arg);
-val curry_12_1(val fun2, val arg2);
-val curry_123_3(val fun3, val arg1, val arg2);
-val curry_123_2(val fun3, val arg1, val arg3);
-val curry_123_1(val fun3, val arg2, val arg3);
-val curry_123_23(val fun3, val arg1);
-val curry_1234_1(val fun4, val arg2, val arg3, val arg4);
-val curry_1234_34(val fun3, val arg1, val arg2);
+val pa_12_2(val fun2, val arg);
+val pa_12_1(val fun2, val arg2);
+val pa_123_3(val fun3, val arg1, val arg2);
+val pa_123_2(val fun3, val arg1, val arg3);
+val pa_123_1(val fun3, val arg2, val arg3);
+val pa_123_23(val fun3, val arg1);
+val pa_1234_1(val fun4, val arg2, val arg3, val arg4);
+val pa_1234_34(val fun3, val arg1, val arg2);
 val chain(val first_fun, ...);
 val chainv(struct args *funlist);
 val chandv(struct args *funlist);