module Stop_at_nth: sig .. end
sig
end
val n : int Pervasives.ref
int Pervasives.ref
val clear : unit -> unit
unit -> unit
val incr : unit -> bool
unit -> bool