sig
  type cp =
      String of string
    | Int of int
    | Float of float
    | List of Femtolib.Config_file.Raw.cp list
    | Tuple of Femtolib.Config_file.Raw.cp list
    | Section of (string * Femtolib.Config_file.Raw.cp) list
  module Parse :
    sig
      val lexer : char Stream.t -> Genlex.token Stream.t
      val file :
        (string * Femtolib.Config_file.Raw.cp) list ->
        Genlex.token Stream.t -> (string * Femtolib.Config_file.Raw.cp) list
      val value : Genlex.token Stream.t -> Femtolib.Config_file.Raw.cp
      val ident : Genlex.token Stream.t -> string
      val list :
        Femtolib.Config_file.Raw.cp list ->
        Genlex.token Stream.t -> Femtolib.Config_file.Raw.cp list
    end
  val save : Format.formatter -> Femtolib.Config_file.Raw.cp -> unit
  val to_channel :
    Pervasives.out_channel -> Femtolib.Config_file.Raw.cp -> unit
  val of_string : string -> Femtolib.Config_file.Raw.cp
  val of_channel :
    Pervasives.in_channel -> (string * Femtolib.Config_file.Raw.cp) list
end