sig
  val parse_control_in_channel :
    ([< `binary | `source ] as 'a) ->
    string ->
    Stdlib.in_channel ->
    (string -> bool) ->
    ('Package.Name.t -> 'Package.t -> '-> 'b) -> '-> 'b
  val parse_control_file :
    ([< `binary | `source ] as 'a) ->
    string ->
    (string -> bool) ->
    ('Package.Name.t -> 'Package.t -> '-> 'b) -> '-> 'b
  val parse_config_from_in_channel :
    ?filename:string -> Stdlib.in_channel -> Benl_types.config
  val parse_config_file : string -> Benl_types.config
  val file_content : string -> string
  val dump_to_file : string -> string -> unit
  val dump_xhtml_to_file : string -> Tyxml.Html.doc -> unit
end