New function: reset-struct.

* struct.c (reset_struct): New function.
(struct_init): Register reset_struct intrinsic.

* struct.h (reset_struct): Declared.

* txr.1: documented reset-struct.

1 files changed, 1 insertions, 0 deletions

diff --git a/struct.h b/struct.h
index dff375eb..52a62fa8 100644
--- a/struct.h
+++ b/struct.h
@@ -34,6 +34,7 @@ val make_struct(val type, val plist, struct args *);
 val copy_struct(val strct);
 val clear_struct(val strct, val value);
 val replace_struct(val target, val source);
+val reset_struct(val strct);
 val find_struct_type(val sym);
 val slot(val strct, val sym);
 val slotset(val strct, val sym, val newval);