diff options
| -rw-r--r-- | xapian/xapian.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/xapian/xapian.scm b/xapian/xapian.scm index bb13039..4b33765 100644 --- a/xapian/xapian.scm +++ b/xapian/xapian.scm @@ -68,6 +68,7 @@ mset-item-rank mset-item-weight mset-fold + termlist-fold mset-snippet mset-sxml-snippet)) @@ -273,6 +274,9 @@ on the database object." (define mset-fold (iterator->fold MSetIterator-next MSetIterator-equals)) +(define termlist-fold + (iterator->fold TermIterator-next TermIterator-equals)) + (define (query term) "Return a @code{Query} object for @var{term}." (new-Query term)) |