aboutsummaryrefslogtreecommitdiffstats
path: root/lib/backend
diff options
context:
space:
mode:
authorMarcos Magueta <maguetamarcos@gmail.com>2026-10-08 20:05:19 -0300
committerMarcos Magueta <maguetamarcos@gmail.com>2026-10-08 20:05:19 -0300
commit41224db2c0929db32da31718af04655ce5e138e6 (patch)
tree3df4d2998ba5e00e8d6be9053985cd8196308b4f /lib/backend
parent46e348142d782cfd94ba37421f92e2871b0f4c22 (diff)
downloadRNT-41224db2c0929db32da31718af04655ce5e138e6.tar.gz
RNT-41224db2c0929db32da31718af04655ce5e138e6.zip
purge schema in favor of simple namespace
Diffstat (limited to 'lib/backend')
-rw-r--r--lib/backend/storage/LMDB.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/lib/backend/storage/LMDB.ml b/lib/backend/storage/LMDB.ml
index fd6cc8e..3b38b93 100644
--- a/lib/backend/storage/LMDB.ml
+++ b/lib/backend/storage/LMDB.ml
@@ -142,8 +142,6 @@ type connection = {env: C.mdb_env_ptr; dbi: C.mdb_dbi}
type transaction = {tx: C.mdb_txn_ptr; dbi: C.mdb_dbi; mutable active: bool}
type address = Label of string | Hash of Concepts.Hash.hash
-let mapsize = 1 lsl 30
-
let parse (c : Concepts.Configuration.term) =
let open Concepts.Configuration in
let open Utilities.Result in
@@ -171,7 +169,7 @@ let connect (c : Concepts.Configuration.term) =
let* () = ensure_directory path (directory_mode mode) in
begin
let* env = C.mdb_env_create' () in
- let* () = C.mdb_env_set_mapsize env (Unsigned.Size_t.of_int mapsize) in
+ let* () = C.mdb_env_set_mapsize env (Unsigned.Size_t.of_int (1 lsl 30)) in
(* NOTLS ties readers to transactions rather than threads, so one
thread can hold several read transactions (nested cursors). *)
match C.mdb_env_open env path C.Flags.mdb_notls (PosixTypes.Mode.of_int mode) with