functor (X : sig val mem : string -> bool end) -> sig val make : string -> Project_skeleton.t val set_name : Project_skeleton.t -> string -> unit end