sig
  type iterator
  val patt : 'a Mindstorm.conn -> string -> Mindstorm.Find.iterator
  val current : Mindstorm.Find.iterator -> string
  val current_size : Mindstorm.Find.iterator -> int
  val next : Mindstorm.Find.iterator -> unit
  val close : Mindstorm.Find.iterator -> unit
  val iter : 'a Mindstorm.conn -> f:(string -> int -> unit) -> string -> unit
  val map : 'a Mindstorm.conn -> f:(string -> int -> 'b) -> string -> 'b list
  val fold :
    'a Mindstorm.conn -> f:(string -> int -> 'b -> 'b) -> string -> 'b -> 'b
end