Module Ui_eventSource

Sourcemodule type Handler = sig ... end
Sourcemodule type S = sig ... end
Sourcetype t = ..
Sourcetype t +=
  1. | Ignore
  2. | Many of t list
Sourcemodule Define (Handler : Handler) : S with type action := Handler.Action.t and type t := t
Sourcemodule Expert : sig ... end