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.

1 files changed, 1 insertions, 0 deletions

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);