From f87767c3e5b0f1920a6179d5cd0d4613cca92658 Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Sat, 29 Aug 2026 01:14:27 +0000 Subject: Make registration more like a CAS --- lib/protocols/Registry.mli | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'lib/protocols/Registry.mli') diff --git a/lib/protocols/Registry.mli b/lib/protocols/Registry.mli index 175ebed..3390167 100644 --- a/lib/protocols/Registry.mli +++ b/lib/protocols/Registry.mli @@ -1,13 +1,11 @@ type t class type implementation = object - method register : string -> Handle.t -> (unit, Concepts.Condition.condition) result - method unregister : string -> (unit, Concepts.Condition.condition) result + method update : string -> Handle.t option -> Handle.t option -> (bool, Concepts.Condition.condition) result end val make : #implementation -> Handle.protocol val from : Handle.t -> t Handle.interface option -val register : t Handle.interface -> string -> Handle.t -> (unit, Concepts.Condition.condition) result -val unregister : t Handle.interface -> string -> (unit, Concepts.Condition.condition) result +val update : t Handle.interface -> string -> Handle.t option -> Handle.t option -> (bool, Concepts.Condition.condition) result -- cgit v1.2.3