aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBob1312021-09-02 07:44:47 +1000
committerArun Isaac2021-09-07 01:23:59 +0530
commitec334fae367af039b83b824e29460b059b0c12af (patch)
tree008957900ace337aef083fa2753ffd36bcc592c2
parentdc0e4ab5aeb76a0ec2d37267b49fd2348ef7c420 (diff)
downloadguile-xapian-ec334fae367af039b83b824e29460b059b0c12af.tar.gz
guile-xapian-ec334fae367af039b83b824e29460b059b0c12af.tar.lz
guile-xapian-ec334fae367af039b83b824e29460b059b0c12af.zip
xapian: Introduce document-slot-ref-bytes.
* xapian/xapian.scm (document-slot-ref-bytes): New function. Signed-off-by: Arun Isaac <arunisaac@systemreboot.net>
-rw-r--r--xapian/xapian.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/xapian/xapian.scm b/xapian/xapian.scm
index 0e2e966..bd613a7 100644
--- a/xapian/xapian.scm
+++ b/xapian/xapian.scm
@@ -38,6 +38,7 @@
document-data
document-bytes
document-slot-ref
+ document-slot-ref-bytes
make-stem
make-term-generator
index-text!
@@ -93,9 +94,9 @@ in-memory database would always remain empty and is of little use."
doc))
(define document-data Document-get-data)
-(define document-slot-ref Document-get-value)
-
(define document-bytes Document-get-data-bytes)
+(define document-slot-ref Document-get-value)
+(define document-slot-ref-bytes Document-get-value-bytes)
(define make-stem new-Stem)