module type Handler = sig

  type t

  val on_close: t -> State.t -> State.t

end

type event = Event : 'a * (module Handler with type t = 'a) -> event

(* The type is both the form handler, the form value, and the HTML element
   which contains the form.

   The signal has to be log in order to be completely working. *)
type t = event Note.signal * Brr.El.t