From b7c4a46e53845cb379be152e994da05e3960eb59 Mon Sep 17 00:00:00 2001
From: Joris van der Hoeven <vdhoeven@lix.polytechnique.fr>
Date: Wed, 21 Jun 2017 20:57:18 +0000
Subject: [PATCH] Re-implement a few potentially time critical routines in C++

---
 devel/scheme/api/glue-auto-doc.en.tm | 48 ++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)

diff --git a/devel/scheme/api/glue-auto-doc.en.tm b/devel/scheme/api/glue-auto-doc.en.tm
index 212e3d2..bbd744e 100644
--- a/devel/scheme/api/glue-auto-doc.en.tm
+++ b/devel/scheme/api/glue-auto-doc.en.tm
@@ -1554,6 +1554,30 @@ source code.
     <scm|array_path>.
   </explain>
 
+  <\explain>
+    <scm|(previous-search-hit <scm-arg|array_path> <scm-arg|path> <scm-arg|bool>)>
+<explain-synopsis|no synopsis>
+  <|explain>
+    Calls the <c++> function <cpp|previous_search_hit> which returns
+    <scm|array_path>.
+  </explain>
+
+  <\explain>
+    <scm|(next-search-hit <scm-arg|array_path> <scm-arg|path> <scm-arg|bool>)>
+<explain-synopsis|no synopsis>
+  <|explain>
+    Calls the <c++> function <cpp|next_search_hit> which returns
+    <scm|array_path>.
+  </explain>
+
+  <\explain>
+    <scm|(navigate-search-hit <scm-arg|path> <scm-arg|bool> <scm-arg|bool> <scm-arg|bool>)>
+<explain-synopsis|no synopsis>
+  <|explain>
+    Calls the <c++> function <cpp|navigate_search_hit> which returns
+    <scm|array_path>.
+  </explain>
+
   <\explain>
     <scm|(tag-minimal-arity <scm-arg|tree_label>)>
 <explain-synopsis|no synopsis>
@@ -6954,6 +6978,30 @@ source code.
     <scm|array_path>.
   </explain>
 
+  <\explain>
+    <scm|(previous-search-hit <scm-arg|array_path> <scm-arg|path> <scm-arg|bool>)>
+<explain-synopsis|no synopsis>
+  <|explain>
+    Calls the <c++> function <cpp|previous_search_hit> which returns
+    <scm|array_path>.
+  </explain>
+
+  <\explain>
+    <scm|(next-search-hit <scm-arg|array_path> <scm-arg|path> <scm-arg|bool>)>
+<explain-synopsis|no synopsis>
+  <|explain>
+    Calls the <c++> function <cpp|next_search_hit> which returns
+    <scm|array_path>.
+  </explain>
+
+  <\explain>
+    <scm|(navigate-search-hit <scm-arg|path> <scm-arg|bool> <scm-arg|bool> <scm-arg|bool>)>
+<explain-synopsis|no synopsis>
+  <|explain>
+    Calls the <c++> function <cpp|navigate_search_hit> which returns
+    <scm|array_path>.
+  </explain>
+
   <\explain>
     <scm|(tag-minimal-arity <scm-arg|tree_label>)>
 <explain-synopsis|no synopsis>