sig
  exception Parse_failure of string
  val parse :
    ?file_name:string -> char Stream.t -> OBus_introspect_ext.interface list
  val parse_file : string -> OBus_introspect_ext.interface list
  val print : Format.formatter -> OBus_introspect_ext.interface list -> unit
  val print_file : string -> OBus_introspect_ext.interface list -> unit
end