diff options
Diffstat (limited to 'editor/app/editor_app.mli')
-rw-r--r-- | editor/app/editor_app.mli | 18 |
1 files changed, 1 insertions, 17 deletions
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)) |