Private.Pp
val tag : [ `Ok | `Fail | `Skip | `Todo | `Assert ] Fmt.t
val map_theta : ( Stdlib.Format.formatter -> unit ) -> f:( unit Fmt.t -> unit Fmt.t ) -> Stdlib.Format.formatter -> unit
val pp_plural : int Fmt.t
This is for adding an 's' to words that should be pluralized, e.g.
let n = List.length items in Fmt.pr "Found %i item%a." n pp_plural n
module Make (_ : sig ... end) : sig ... end