Consistbl.Makemodule Module_name : sig ... endval create : unit -> tval clear : t -> unitval check : t -> Module_name.t -> Digest.t -> Misc.filepath -> unitval check_noadd : t -> Module_name.t -> Digest.t -> Misc.filepath -> unitval set : t -> Module_name.t -> Digest.t -> Misc.filepath -> unitval source : t -> Module_name.t -> Misc.filepathval extract : Module_name.t list -> t -> (Module_name.t * Digest.t option) listval extract_map : Module_name.Set.t -> t -> Digest.t option Module_name.Map.tval filter : (Module_name.t -> bool) -> t -> unitexception Inconsistency of {unit_name : Module_name.t; |
inconsistent_source : string; |
original_source : string; |
}exception Not_available of Module_name.t