From 713f4c6eb6f55520e39bf7100b2e58ce65268468 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Fri, 30 Apr 2021 19:47:54 -0700
Subject: tree: new functions for reseting iterator.

* tree.c (tree_reset, tree_reset_at): New functions.
(tree_init): tree-reset and tree-reset-at intrinsics
registered.

* tree.h (tree_reset, tree_reset_at): Declared.

* tests/010/tree.tl: New tests.

* txr.1: Documented.

* share/txr/stdlib/doc-syms.tl: Updated.
---
 tree.h | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'tree.h')

diff --git a/tree.h b/tree.h
index a0d12692..7b7c3ef0 100644
--- a/tree.h
+++ b/tree.h
@@ -44,6 +44,8 @@ val treep(val obj);
 val tree_insert_node(val tree, val node);
 val tree_begin(val tree);
 val tree_begin_at(val tree, val lowkey);
+val tree_reset(val iter, val tree);
+val tree_reset_at(val iter, val tree, val lowkey);
 val tree_next(val iter);
 val tree_clear(val tree);
 void tree_init(void);
-- 
cgit v1.2.3