Yalo.Message_format
val display_messages : on_error:(int -> unit) -> ?summary:int option -> ?format:Types.message_format -> ?output:string -> Types.message list -> unit