sig
type 'a sformat = ('a, Stdlib.Format.formatter, unit) Stdlib.format
type 'a formatter = Stdlib.Format.formatter -> 'a -> unit
val pp_iter :
?pre:unit Pretty_memory.sformat ->
?sep:unit Pretty_memory.sformat ->
?suf:unit Pretty_memory.sformat ->
?format:('a Pretty_memory.formatter -> 'a -> unit) Pretty_memory.sformat ->
(('a -> unit) -> 'b -> unit) ->
'a Pretty_memory.formatter -> 'b Pretty_memory.formatter
val pp_iter2 :
?pre:unit Pretty_memory.sformat ->
?sep:unit Pretty_memory.sformat ->
?suf:unit Pretty_memory.sformat ->
?format:('a Pretty_memory.formatter ->
'a -> 'b Pretty_memory.formatter -> 'b -> unit)
Pretty_memory.sformat ->
(('a -> 'b -> unit) -> 'c -> unit) ->
'a Pretty_memory.formatter ->
'b Pretty_memory.formatter -> 'c Pretty_memory.formatter
end