Module WrapperFunctionAnalysis.SpecBase

Parameters

module UniqueCount : Lattice.S with type t = int

Signature

include module type of struct include Analyses.IdentitySpec end
include module type of struct include Analyses.DefaultSpec end

Relatively safe default implementations of some boring Spec functions.

module G = Lattice.Unit
module V = Analyses.EmptyV
module P = Analyses.UnitP
val finalize : unit -> unit
val vdecl : ('a, 'b, 'c, 'd) Analyses.man -> 'e -> 'f
val asm : ('a, 'b, 'c, 'd) Analyses.man -> 'e
val skip : ('a, 'b, 'c, 'd) Analyses.man -> 'e
val query : 'b -> 'a Queries.t -> 'a0
val event : ('a, 'b, 'c, 'd) Analyses.man -> 'e -> 'f -> 'g
val morphstate : 'a -> 'b -> 'c
val sync : ('a, 'b, 'c, 'd) Analyses.man -> 'e -> 'f
val context : 'a -> 'b -> 'c -> 'd
val paths_as_set : ('a, 'b, 'c, 'd) Analyses.man -> 'e list
module A = Analyses.UnitA
val access : 'a -> 'b -> unit
val assign : ('a, 'b, 'c, 'd) Analyses.man -> GoblintCil.lval -> GoblintCil.exp -> 'e
val branch : ('a, 'b, 'c, 'd) Analyses.man -> GoblintCil.exp -> bool -> 'e
val body : ('a, 'b, 'c, 'd) Analyses.man -> GoblintCil.fundec -> 'e
val return : ('a, 'b, 'c, 'd) Analyses.man -> GoblintCil.exp option -> GoblintCil.fundec -> 'e
val combine_assign : ('a, 'b, 'c, 'd) Analyses.man -> GoblintCil.lval option -> 'e -> GoblintCil.fundec -> GoblintCil.exp list -> 'f -> 'g -> Queries.ask -> 'h
val threadspawn : ('a, 'b, 'c, 'd) Analyses.man -> multiple:'e -> 'f -> 'g -> 'h -> 'i -> 'j
val node_for_man : ('a, 'b, 'c, 'd) Analyses.man -> MyCFG.node
module NodeFlatLattice : sig ... end
module UniqueCount = UniqueCount
module UniqueCallCounter : sig ... end
val add_unique_call : UniqueCallCounter.t -> Node.t -> UniqueCallCounter.t
module D : sig ... end
include sig ... end
module C : sig ... end
val startcontext : unit -> D.t
val wrappers : (string, unit) Stdlib.Hashtbl.t
val enter : (D.t, 'a, 'b, 'c) Analyses.man -> GoblintCil.lval option -> GoblintCil.fundec -> GoblintCil.exp list -> (D.t * D.t) list
val combine_env : ('a * 'b, 'c, 'd, 'e) Analyses.man -> 'f -> 'g -> 'h -> 'i -> 'j -> ('k * 'l) -> 'm -> 'n * 'o
val add_unique_call_man : ([> `Lifted of Node.t ] as 'a * UniqueCallCounter.t, 'b, 'c, 'd) Analyses.man -> 'e * UniqueCallCounter.t
val special : (D.t, G.t, C.t, V.t) Analyses.man -> GoblintCil.lval option -> GoblintCil.varinfo -> GoblintCil.exp list -> D.t
val startstate : 'a -> D.t
val threadenter : 'a -> multiple:'b -> 'c -> 'd -> 'e -> D.t list
val exitstate : 'a -> D.t
type marshal = unit
val init : marshal option -> unit