sig   val to_one_liner : ?no_trap:bool -> 'a Language.t -> string   val to_many_lines : ?no_trap:bool -> 'a Language.t -> string end