IBase.EarlyScubaLogging
val log_message : label:string -> message:string -> unit
val finish : unit -> LogEntry.t list