about summary refs log tree commit diff
path: root/xapian
diff options
context:
space:
mode:
authorArun Isaac2026-09-23 01:52:08 +0100
committerArun Isaac2026-09-23 02:00:52 +0100
commit01fa9770083b2a7616c111ad9da83b29a7ba174b (patch)
tree516c006a65307422192e9d511acb8267f56a05d4 /xapian
parent860bff1e26911e725e7dddf48f9f0cbeb9627f1e (diff)
downloadguile-xapian-01fa9770083b2a7616c111ad9da83b29a7ba174b.tar.gz
guile-xapian-01fa9770083b2a7616c111ad9da83b29a7ba174b.tar.lz
guile-xapian-01fa9770083b2a7616c111ad9da83b29a7ba174b.zip
Add positionlist-fold.
Diffstat (limited to 'xapian')
-rw-r--r--xapian/xapian.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/xapian/xapian.scm b/xapian/xapian.scm
index 94842cc..fa22bbe 100644
--- a/xapian/xapian.scm
+++ b/xapian/xapian.scm
@@ -72,6 +72,7 @@
             mset-item-weight
             mset-fold
             termlist-fold
+            positionlist-fold
             term-string
             term-wdf
             term-freq
@@ -297,6 +298,9 @@ on the database object."
 (define termlist-fold
   (iterator->fold TermIterator-next TermIterator-equals))
 
+(define positionlist-fold
+  (iterator->fold PositionIterator-next PositionIterator-equals))
+
 (define term-string TermIterator-get-term)
 (define term-wdf TermIterator-get-wdf)
 (define term-freq TermIterator-get-termfreq)