aboutsummaryrefslogtreecommitdiffstats
path: root/lib/protocols/Handle.ml
diff options
context:
space:
mode:
authorMarcos Magueta <maguetamarcos@gmail.com>2026-09-23 03:32:15 -0300
committerMarcos Magueta <maguetamarcos@gmail.com>2026-09-23 03:32:15 -0300
commit882511dc8c0abded18ba6abdca64938db2652771 (patch)
treed1ebc2896cf9bb939a89c10d626d19cd5d4f591e /lib/protocols/Handle.ml
parentb4422c99e10a8daee452b22aea84cb1f68ae54bc (diff)
downloadRNT-882511dc8c0abded18ba6abdca64938db2652771.tar.gz
RNT-882511dc8c0abded18ba6abdca64938db2652771.zip
lift retaining, membership and mode checks out of ephemeral relation
Diffstat (limited to 'lib/protocols/Handle.ml')
-rw-r--r--lib/protocols/Handle.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/protocols/Handle.ml b/lib/protocols/Handle.ml
index cb78cf2..378b8c8 100644
--- a/lib/protocols/Handle.ml
+++ b/lib/protocols/Handle.ml
@@ -49,6 +49,7 @@ let equal h1 h2 =
Concepts.Hash.hash_equals (object_of h1)#hash (object_of h2)#hash
let hash h = (object_of h)#hash
+let protocols h = (object_of h)#protocols
let release ({ valid; _ } as handle) =
let o = object_of handle in