aboutsummaryrefslogtreecommitdiffstats
path: root/lib/protocols/Program.ml
diff options
context:
space:
mode:
authorMarcos Magueta <maguetamarcos@gmail.com>2026-09-25 21:51:33 -0300
committerMarcos Magueta <maguetamarcos@gmail.com>2026-09-25 21:51:33 -0300
commit584fbca6d920e9a9f91d451667f9380714ac2175 (patch)
treea163b916a6f8cb550c8b38ceb01ab01558687a40 /lib/protocols/Program.ml
parentc7b754e96714eeeb9d315ee3de402d73a27d47db (diff)
downloadRNT-584fbca6d920e9a9f91d451667f9380714ac2175.tar.gz
RNT-584fbca6d920e9a9f91d451667f9380714ac2175.zip
dune fmt
Diffstat (limited to '')
-rw-r--r--lib/protocols/Program.ml1
-rw-r--r--lib/protocols/Program.mli1
2 files changed, 0 insertions, 2 deletions
diff --git a/lib/protocols/Program.ml b/lib/protocols/Program.ml
index 5b618e6..e50f07d 100644
--- a/lib/protocols/Program.ml
+++ b/lib/protocols/Program.ml
@@ -8,7 +8,6 @@ module Make (P : PROGRAM) = struct
end
type Handle.protocol += Program of implementation
-
type t = implementation
let make impl = Program (impl :> implementation)
diff --git a/lib/protocols/Program.mli b/lib/protocols/Program.mli
index 9cf4455..6cdffd8 100644
--- a/lib/protocols/Program.mli
+++ b/lib/protocols/Program.mli
@@ -11,6 +11,5 @@ module Make (P : PROGRAM) : sig
val make : #implementation -> Handle.protocol
val from : Handle.t -> t Handle.interface option
-
val invoke : t Handle.interface -> P.t -> (Handle.t, Concepts.Condition.condition) result
end