From 6f1b152a6927171b0c0bfed207307ed1bac1900d Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Mon, 7 Feb 2022 13:40:47 +0100 Subject: Reflect API change in editor --- editor/app/editor_app.mli | 18 +----------------- 1 file changed, 1 insertion(+), 17 deletions(-) (limited to 'editor/app/editor_app.mli') diff --git a/editor/app/editor_app.mli b/editor/app/editor_app.mli index aaa4d65..d612dca 100644 --- a/editor/app/editor_app.mli +++ b/editor/app/editor_app.mli @@ -1,17 +1 @@ -module type Event = sig - - type t - - val process: t -> State.t -> State.t - -end - -type event = E : 'a * (module Event with type t = 'a) -> event - -(** Simple helper for the main event loop *) -val run - : ?eq:(State.t -> State.t -> bool) -> State.t -> event Note.E.t -> State.t Note.S.t - -val dispatch - : (module Event with type t = 's) -> 's -> event - +include module type of (Application.Make(struct type t = State.t end)) -- cgit v1.2.3