aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/Prototype.mli
diff options
context:
space:
mode:
authorEstevan Castilho <tevo@riajuu.net>2026-10-24 01:49:53 +0000
committerEstevan Castilho <tevo@riajuu.net>2026-10-24 01:49:53 +0000
commit5a6af8a74895b548ed39649aef4a09fb53b4dbbc (patch)
tree76b0e3b15e73bb8c51d95cda41b50843e7229151 /lib/kernel/Prototype.mli
parent0f5161930584eaf91fd195b891ce7d9130c7b7f1 (diff)
downloadRNT-5a6af8a74895b548ed39649aef4a09fb53b4dbbc.tar.gz
RNT-5a6af8a74895b548ed39649aef4a09fb53b4dbbc.zip
Avoid implementing `Directory` inline?
Diffstat (limited to 'lib/kernel/Prototype.mli')
-rw-r--r--lib/kernel/Prototype.mli4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/kernel/Prototype.mli b/lib/kernel/Prototype.mli
index 9c446fc..ec1f08e 100644
--- a/lib/kernel/Prototype.mli
+++ b/lib/kernel/Prototype.mli
@@ -6,6 +6,10 @@ val mixture : Protocols.Handle.protocol list -> Protocols.Handle.t
module Directory : sig
val of_properties : (string * Protocols.Handle.t) list -> Protocols.Handle.protocol
+ val of_properties' :
+ (string * (unit -> (Protocols.Handle.t option, Concepts.Condition.condition) result)) list ->
+ Protocols.Handle.protocol
+
(** the names a directory lists, and what each reaches. *)
val children :
Protocols.Handle.t -> ((string * Protocols.Handle.t) list, Concepts.Condition.condition) result