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