From a8eba5d882105580383cf0da91d87c2477440f37 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 15 Nov 2023 07:15:15 -0800 Subject: New accessor: mref. * eval.c (eval_init): Register mref intrinsic. * lib.[ch] (mref): New function. * stdlib/place.tl (sys:mref1): New place. (mref): New place macro, defined in terms of sys:merf1, ref place and mref function. * tests/012/seq.tl: New tests. * txr.1: Documented. --- lib.h | 1 + 1 file changed, 1 insertion(+) (limited to 'lib.h') diff --git a/lib.h b/lib.h index b86e85bd..beef16ee 100644 --- a/lib.h +++ b/lib.h @@ -1394,6 +1394,7 @@ val ref(val seq, val ind); val refset(val seq, val ind, val newval); val dwim_set(val place_p, val seq, varg); val dwim_del(val place_p, val seq, val ind_range); +val mref(val obj, varg args); val butlast(val seq, val idx); val replace(val seq, val items, val from, val to); val update(val seq, val fun); -- cgit v1.2.3