val option' :
(Stdlib.Format.formatter -> 'a -> unit) ->
Stdlib.Format.formatter ->
'a option ->
unit
val via : Stdlib.Format.formatter -> via -> unit
val sign : Stdlib.Format.formatter -> sign -> unit
val _sig_via : Stdlib.Format.formatter -> (sign * via option) -> unit
val body : Stdlib.Format.formatter -> body -> unit
val body' : Stdlib.Format.formatter -> body -> unit
val message : Stdlib.Format.formatter -> t -> unit
val message_short : Stdlib.Format.formatter -> t -> unit