tree: add tree-clear function.

* tree.c (tree_clear): New function.
(tree_init): tree-clear intrinsic registered.

* tree.h (tree_clear): Declared.

1 files changed, 1 insertions, 0 deletions

diff --git a/tree.h b/tree.h
index 871c80bb..94270b4b 100644
--- a/tree.h
+++ b/tree.h
@@ -39,4 +39,5 @@ val treep(val obj);
 val tree_insert_node(val tree, val node);
 val tree_begin(val tree);
 val tree_next(val iter);
+val tree_clear(val tree);
 void tree_init(void);