X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=index%2Frecords.c;h=d63aac6d367b2dd0d1293c33ea8606e6f2126687;hb=da232e65627649c30c4f804240c899880f379a8b;hp=f6ef93d0e7301709250532f4f587c27b5464263c;hpb=b3b36220e89289a4a2e7b4ee1d28cf4df4e07635;p=idzebra-moved-to-github.git

diff --git a/index/records.c b/index/records.c
index f6ef93d..d63aac6 100644
--- a/index/records.c
+++ b/index/records.c
@@ -934,6 +934,21 @@ Record rec_get_root(Records p)
     return rec_get(p, rec_sysno_to_ext(1));
 }
 
+Record rec_get_next(Records p, Record rec)
+{
+    Record next = 0;
+    zint next_sysno_int = rec_sysno_to_int(rec->sysno);
+
+    while (!next)
+    {
+         ++next_sysno_int;
+        if (next_sysno_int == p->head.index_last)
+            break;
+        next = rec_get(p, rec_sysno_to_ext(next_sysno_int));
+    }
+    return next;
+}
+
 static Record rec_new_int(Records p)
 {
     int i;