sig
  type t = Current | Future
  val t_of_sexp : Sexplib.Sexp.t -> Unix.Mman.Mcl_flags.t
  val sexp_of_t : Unix.Mman.Mcl_flags.t -> Sexplib.Sexp.t
end