Module Ident.Gen

type ident = t
type t = {
  1. mutable next : int;
}
val create : unit -> t
val get_fresh : t -> ident