sig
  type t = Parsing | Typing
  val of_string : string -> Clflags.Compiler_pass.t option
  val to_string : Clflags.Compiler_pass.t -> string
  val passes : Clflags.Compiler_pass.t list
  val pass_names : string list
end