initial commit with rc for skalibs-2.0.0.0

1 files changed, 16 insertions, 0 deletions

diff --git a/src/libdatastruct/avlnode_searchnode.c b/src/libdatastruct/avlnode_searchnode.c
new file mode 100644
index 0000000..4ab015c
--- /dev/null
+++ b/src/libdatastruct/avlnode_searchnode.c
@@ -0,0 +1,16 @@
+/* ISC license. */
+
+#include <skalibs/functypes.h>
+#include <skalibs/avlnode.h>
+#include "avlnode-internal.h"
+
+unsigned int avlnode_searchnode (avlnode const *s, unsigned int max, unsigned int r, void const *k, dtokfunc_t_ref dtok, cmpfunc_t_ref f, void *p)
+{
+  while (r < max)
+  {
+    register int h = (*f)(k, (*dtok)(s[r].data, p), p) ;
+    if (!h) break ;
+    r = s[r].child[avlnode_ufroms(h)] ;
+  }
+  return r ;
+}