aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/Session.ml
diff options
context:
space:
mode:
authorMarcos Magueta <maguetamarcos@gmail.com>2026-09-27 15:00:27 -0300
committerMarcos Magueta <maguetamarcos@gmail.com>2026-09-27 15:00:27 -0300
commit5370c5f1ce62cc9add4f3f6523bdd1f2b897cfa0 (patch)
tree9a5aeda3c53c3256a60c1b91320af0d8450d1bdc /lib/kernel/Session.ml
parentf91e63c3bbe9f23ec11ab9c21e58edb6e61c94f9 (diff)
downloadRNT-5370c5f1ce62cc9add4f3f6523bdd1f2b897cfa0.tar.gz
RNT-5370c5f1ce62cc9add4f3f6523bdd1f2b897cfa0.zip
session exclusive lifetime
Diffstat (limited to 'lib/kernel/Session.ml')
-rw-r--r--lib/kernel/Session.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/kernel/Session.ml b/lib/kernel/Session.ml
index 75bf8c9..322d0e0 100644
--- a/lib/kernel/Session.ml
+++ b/lib/kernel/Session.ml
@@ -4,7 +4,7 @@ module Make (S : Abstract.Storage.STORAGE) = struct
class session storage state =
object (self)
- inherit Lifecycle.null
+ inherit Lifecycle.exclusive
inherit Identity.of_id
method to_string = "session"
val storage : S.connection = storage
@@ -13,7 +13,6 @@ module Make (S : Abstract.Storage.STORAGE) = struct
method pin state' = Atomic.set state state'
method protocols = Protocols.[Directory.make self; Session.make self]
method list = Ok (BatFingerTree.singleton "branch")
-
method find =
function
| "branch" ->