diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/protocols/Program.ml | 1 | ||||
| -rw-r--r-- | lib/protocols/Program.mli | 1 |
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 |