Usage_logs.Debug
val log : ?time:float -> Event.Debug.t -> unit
val session_id : string Stdlib.ref
val start : filename:string -> proc:string -> unit
val stop : unit -> unit
val log_interaction : Event.Debug.interaction -> unit