Minimal SQLite key-value store for OCaml
Read git HEAD directly instead of shelling out to git rev-parse
Read .git/HEAD and follow the ref to get the commit hash. No
subprocess, no dependency on git being in PATH. Uses Bos.OS.File.read
which is already a dependency.
+3
+3
lib/sqlite.ml
+3
lib/sqlite.ml
···
717
717
rowid_snaps : (string * int64) list;
718
718
table_roots : (Btree.Table.t * int) list;
719
719
index_roots : (Btree.Index.t * int) list;
720
+
all_tables_snap : generic_table list;
721
+
named_tables_snap : (string * kv_table) list;
722
+
extra_master_snap : raw_master_entry list;
720
723
}
721
724
722
725
let snapshot_txn t =