Cmi_formattype cmi_infos = {cmi_name : string;cmi_sign : Types.signature_item list;cmi_crcs : (string * Digest.t option) list;cmi_flags : pers_flags list;}val output_cmi : string -> out_channel -> cmi_infos -> Digest.tval input_cmi : in_channel -> cmi_infosval read_cmi : string -> cmi_infosexception Error of errorval report_error : Format.formatter -> error -> unit