external get_eventPhase : this:[> `EventGdomeT.t -> int = "ml_gdome_evnt_get_eventPhase"