1.1--- a/lisp/ffi/rocksdb/db.lisp Wed May 08 19:55:56 2024 -0400
1.2+++ b/lisp/ffi/rocksdb/db.lisp Wed May 08 20:52:48 2024 -0400
1.3@@ -631,8 +631,11 @@
1.4 (define-alien-routine rocksdb-create-snapshot (* rocksdb-snapshot)
1.5 (db (* rocksdb)))
1.6
1.7+(define-alien-routine rocksdb-snapshot-get-sequence-number (unsigned 64)
1.8+ (snapshot (* rocksdb-snapshot)))
1.9+
1.10 (define-alien-routine rocksdb-release-snapshot void
1.11 (db (* rocksdb))
1.12 (snapshot (* rocksdb-snapshot)))
1.13
1.14-(export '(rocksdb-create-snapshot rocksdb-release-snapshot))
1.15+(export '(rocksdb-create-snapshot rocksdb-snapshot-get-sequence-number rocksdb-release-snapshot))