aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel
diff options
context:
space:
mode:
authorMarcos Magueta <maguetamarcos@gmail.com>2026-09-23 02:41:09 -0300
committerMarcos Magueta <maguetamarcos@gmail.com>2026-09-23 02:41:09 -0300
commit1af6d13048de3773149f689de3c07af96db07f1d (patch)
tree195f14a00b1f2d425f1ddb723a4e9bb16f7a4a7f /lib/kernel
parent3184f85de1dac7071afcf9838dfc3f8609b20a5a (diff)
downloadRNT-1af6d13048de3773149f689de3c07af96db07f1d.tar.gz
RNT-1af6d13048de3773149f689de3c07af96db07f1d.zip
make scan use rdonly transaction on the cursor to avoid deadlock
Diffstat (limited to '')
-rw-r--r--lib/kernel/SubstantialRelation.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/kernel/SubstantialRelation.ml b/lib/kernel/SubstantialRelation.ml
index 1b58e9a..d3f306b 100644
--- a/lib/kernel/SubstantialRelation.ml
+++ b/lib/kernel/SubstantialRelation.ml
@@ -130,7 +130,7 @@ module Make (S : Abstract.Storage.STORAGE) = struct
let scan storage relation ~keep =
let open Utilities.Result in
- let* tx = S.start storage in
+ let* tx = S.start_read storage in
let* node = tuple_node tx relation in
let closed = ref false in
let close () = if not !closed then begin closed := true; ignore (S.abort tx) end in