Module Cmi_format

type pers_flags =
| Rectypes
| Alerts of Misc.alerts
| Opaque
| Unsafe_string
type cmi_infos = {
cmi_name : Misc.modname;
cmi_sign : Types.signature_item list;
cmi_crcs : Misc.crcs;
cmi_flags : pers_flags list;
}
val output_cmi : string -> out_channel -> cmi_infos -> Digest.t
val input_cmi : in_channel -> cmi_infos
val read_cmi : string -> cmi_infos
type error =
| Not_an_interface of Misc.filepath
| Wrong_version_interface of Misc.filepath * string
| Corrupted_interface of Misc.filepath
exception Error of error
val report_error : Format.formatter -> error -> unit