Module Register.WP_UnsafeCaveat


module WP_UnsafeCaveat: CfgProof.Create(Caveat_mem.Unsafe.WP)(Caveat_mem.Unsafe.Why)(Caveat_mem.Unsafe.Coq)(Caveat_mem.Unsafe.Ergo91)(Caveat_mem.Unsafe.Ergo92)(Caveat_mem.Unsafe.Splitter)(sig
val shared : string
val context : string
val updater : string
val name : string
end)

module Me: State_builder.Ref(Datatype.Unit)(sig
val dependencies : State.t list
val name : string
val kind : [> `Correctness ]
val default : unit -> unit
end)
module F: WpModel.D.F
module D: WpModel.D
module CV: CfgWeakestPrecondition.Create(sig
include WpModel
val model : string
end)
module PO: Cfgpropid.Create(CV)
module WP: Calculus.Cfg(PO)
module ST: Properties_status.Make_updater(sig
val name : string
val emitter : State.t
end)

type exportation = {
   env : string;
   mutable goals : Wpo.t list;
}
val assigns_method : unit -> Mcfg.assigns_method
val export_wpo : exportation ->
Db_types.kernel_function ->
string option ->
Wpo.warning list ->
Wpo.dependency list -> WpAnnot.prop_id -> F.pred -> unit
val build_wpos : exportation ->
Db_types.kernel_function ->
string option ->
Wpo.warning list ->
Wpo.dependency list -> WpAnnot.prop_id -> Splitter.pred -> unit
val add_goal : exportation ->
Db_types.kernel_function ->
string option -> PO.t_goal -> unit
class computer : object .. end
val create : unit -> computer