aboutsummaryrefslogtreecommitdiff
path: root/editor/state
diff options
context:
space:
mode:
Diffstat (limited to 'editor/state')
-rwxr-xr-xeditor/state/state.ml4
-rwxr-xr-xeditor/state/state.mli15
2 files changed, 0 insertions, 19 deletions
diff --git a/editor/state/state.ml b/editor/state/state.ml
index 2662a48..33b796f 100755
--- a/editor/state/state.ml
+++ b/editor/state/state.ml
@@ -14,7 +14,6 @@ type t =
; window : Brr.El.t list
; pm : PM.t
}
-type state = t
(** Compare two states together.
@@ -108,6 +107,3 @@ let init
; window = []
; pm
}
-
-
-include Application.Make(struct type t = state end)
diff --git a/editor/state/state.mli b/editor/state/state.mli
index 4376723..57b45fa 100755
--- a/editor/state/state.mli
+++ b/editor/state/state.mli
@@ -31,18 +31,3 @@ val new_page
(** Initialise a new state *)
val init
: Prosemirror.t -> Prosemirror.View.editor_view Js.t -> float -> Jstr.t option -> t
-
-type state = t
-module type Event = sig
-
- type t
-
- val update: t -> state -> state
-
-end
-
-type event = E : 'a * (module Event with type t = 'a) -> event
-
-(** Simple helper for the main event loop *)
-val run
- : ?eq:(t -> t -> bool) -> t -> event Note.E.t -> state Note.S.t