aboutsummaryrefslogtreecommitdiffstats
path: root/lib/protocols/Directory.ml
diff options
context:
space:
mode:
authorEstevan Castilho <tevo@riajuu.net>2026-08-22 23:22:31 +0000
committerEstevan Castilho <tevo@riajuu.net>2026-08-23 03:07:00 +0000
commit9ef2323823c8fea8cfb53e9c011433daeb7ec66f (patch)
tree795874cc726b6daa0dd95da632c36d90e56f9b82 /lib/protocols/Directory.ml
parent339c9b0e30719e2e68310c90a1c9ef27f54c9d09 (diff)
downloadRNT-9ef2323823c8fea8cfb53e9c011433daeb7ec66f.tar.gz
RNT-9ef2323823c8fea8cfb53e9c011433daeb7ec66f.zip
Make the interfaces open
Diffstat (limited to 'lib/protocols/Directory.ml')
-rw-r--r--lib/protocols/Directory.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/protocols/Directory.ml b/lib/protocols/Directory.ml
index 5a2637f..5b21668 100644
--- a/lib/protocols/Directory.ml
+++ b/lib/protocols/Directory.ml
@@ -7,7 +7,7 @@ type Handle.protocol += Directory of implementation
type t = implementation
-let make impl = Directory impl
+let make impl = Directory (impl :> implementation)
let from handle = Handle.into handle (function Directory impl -> Some impl | _ -> None)