Analyses (goblint.Goblint

module M = Messages

type fundecs =
  GoblintCil.fundec list * GoblintCil.fundec list * GoblintCil.fundec list

Analysis starts from lists of functions: start functions, exit functions, and * other functions.

module Var : sig ... end

module VarF (LD : Printable.S) : sig ... end

module type SpecSysVar = sig ... end

module GVarF (V : SpecSysVar) : sig ... end

module GVarFC (V : SpecSysVar) (C : Printable.S) : sig ... end

module GVarG (G : Lattice.S) (C : Printable.S) : sig ... end

exception Deadcode

module Dom (LD : Lattice.S) : sig ... end

Dom (D) produces D lifted where bottom means dead-code

type ('d, 'g, 'c, 'v) ctx = {

ask : 'a. 'a Queries.t -> 'a Queries.result;
emit : Events.t -> unit;
node : MyCFG.node;
prev_node : MyCFG.node;
control_context : unit -> ControlSpecC.t;
(*
top-level Control Spec context, raises Ctx_failure if missing
*)
context : unit -> 'c;
(*
current Spec context, raises Ctx_failure if missing
*)
edge : MyCFG.edge;
local : 'd;
global : 'v -> 'g;
spawn : ?multiple:bool -> GoblintCil.lval option -> GoblintCil.varinfo -> GoblintCil.exp list -> unit;
split : 'd -> Events.t list -> unit;
sideg : 'v -> 'g -> unit;

}

exception Ctx_failure of string

Failure from ctx, e.g. global initializer

val ctx_failwith : string -> 'a

val ask_of_ctx : ('a, 'b, 'c, 'd) ctx -> Queries.ask

Convert ctx to Queries.ask.

module type Spec = sig ... end

module type MCPA = sig ... end

module type MCPSpec = sig ... end

type increment_data = {

}

module StdV : sig ... end

module UnitV : sig ... end

module VarinfoV : sig ... end

module EmptyV : sig ... end

module UnitA : sig ... end

module UnitP : sig ... end

module IdentityP (D : Lattice.S) : sig ... end

module DefaultSpec : sig ... end

Relatively safe default implementations of some boring Spec functions.

module IdentitySpec : sig ... end

module IdentityUnitContextsSpec : sig ... end

module ValueContexts (D : Lattice.S) : sig ... end

module type SpecSys = sig ... end

module type SpecSysSol = sig ... end