Module Consistbl.Make

Parameters

module Module_name : sig ... end
module Data : sig ... end

Signature

type t
val create : unit -> t
val clear : t -> unit
val check : t -> Module_name.t -> Data.t -> Digest.t -> Misc.filepath -> unit
val check_noadd : t -> Module_name.t -> Data.t -> Digest.t -> Misc.filepath -> unit
val source : t -> Module_name.t -> Misc.filepath
val find : t -> Module_name.t -> (Data.t * Digest.t) option
val extract : Module_name.t list -> t -> (Module_name.t * (Data.t * Digest.t) option) list
val extract_map : Module_name.Set.t -> t -> (Data.t * Digest.t) option Module_name.Map.t
val filter : (Module_name.t -> bool) -> t -> unit
exception Inconsistency of {
  1. unit_name : Module_name.t;
  2. inconsistent_source : string;
  3. original_source : string;
  4. inconsistent_data : Data.t;
  5. original_data : Data.t;
}
exception Not_available of Module_name.t