sig
  val get :
    (Cilutil.StringSet.t -> cast_intro:bool -> Project.t) Pervasives.ref
  val compute : (unit -> unit) Pervasives.ref
end