summaryrefslogtreecommitdiffstats
path: root/lib.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2019-03-12 22:34:25 -0700
committerKaz Kylheku <kaz@kylheku.com>2019-03-12 22:34:25 -0700
commit7717eedcb68dfa7cfdd2327f9c29f99e9ecc4c01 (patch)
tree0c7c8bebef092e68b9e6eab305d6e9aea346dee2 /lib.c
parent066a88f72be6063d9e8e9a6feb726ba017e2d675 (diff)
downloadtxr-7717eedcb68dfa7cfdd2327f9c29f99e9ecc4c01.tar.gz
txr-7717eedcb68dfa7cfdd2327f9c29f99e9ecc4c01.tar.bz2
txr-7717eedcb68dfa7cfdd2327f9c29f99e9ecc4c01.zip
lib: rename make_half_lazy_cons.
* lib.h (make_half_lazy_cons): Renamed to make make_lazy_cons_car. * lib.c (rem_lazy_rec, make_half_lazy_cons): Follow rename. * hash.c (hash_keys_lazy, hash_keys, hash_values_lazy, hash_values, hash_pairs_lazy, hash_pairs, hash_alist_lazy, hash_alist): Follow rename.
Diffstat (limited to 'lib.c')
-rw-r--r--lib.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib.c b/lib.c
index bb34f88d..fd968ab0 100644
--- a/lib.c
+++ b/lib.c
@@ -1989,7 +1989,7 @@ static val rem_lazy_rec(val pred, val list, val env, val func)
func = func_f1(cons(pred, cdr(list)), rem_lazy_func);
else
rplacd(env, cdr(list));
- return make_half_lazy_cons(func, car(list));
+ return make_lazy_cons_car(func, car(list));
}
val remq_lazy(val obj, val list)
@@ -3002,7 +3002,7 @@ val make_lazy_cons(val func)
return obj;
}
-val make_half_lazy_cons(val func, val car)
+val make_lazy_cons_car(val func, val car)
{
val obj = make_obj();
obj->lc.type = LCONS;