Module ThreadEvent.M

type reason =
  1. | Started
  2. | Exited
  3. | Other of string
val reason_of_js : Ojs.t -> reason
val reason_to_js : reason -> Ojs.t
type body = {
  1. reason : reason;
  2. threadId : int;
}
val body_of_js : Ojs.t -> body
val body_to_js : body -> Ojs.t
val event : string