SpecBase (goblint.Goblint_lib.WrapperFunctionAnalysis.SpecBase)

Parameters

module UniqueCount : Lattice.S with type t = int

module WrapperArgs : WrapperArgs

Signature

include module type of struct include Analyses.IdentitySpec end

include module type of struct include Analyses.DefaultSpec end

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 -> 'a

val asm : ('a, 'b, 'c, 'd) Analyses.man -> 'a

val skip : ('a, 'b, 'c, 'd) Analyses.man -> 'a

val query : 'b -> 'a Queries.t -> 'a

val event : ('a, 'b, 'c, 'd) Analyses.man -> 'e -> 'f -> 'a

val morphstate : 'a -> 'b -> 'b

val sync : ('a, 'b, 'c, 'd) Analyses.man -> 'e -> 'a

val context : 'a -> 'b -> 'c -> 'c

val paths_as_set : ('a, 'b, 'c, 'd) Analyses.man -> 'a list

module A = Analyses.UnitA

val access : 'a -> 'b -> unit

val assign : 
  ('a, 'b, 'c, 'd) Analyses.man ->
  GoblintCil.lval ->
  GoblintCil.exp ->
  'a

val branch : ('a, 'b, 'c, 'd) Analyses.man -> GoblintCil.exp -> bool -> 'a

val body : ('a, 'b, 'c, 'd) Analyses.man -> GoblintCil.fundec -> 'a

val return : 
  ('a, 'b, 'c, 'd) Analyses.man ->
  GoblintCil.exp option ->
  GoblintCil.fundec ->
  'a

val combine_assign : 
  ('a, 'b, 'c, 'd) Analyses.man ->
  GoblintCil.lval option ->
  'e ->
  GoblintCil.fundec ->
  GoblintCil.exp list ->
  'f ->
  'g ->
  Queries.ask ->
  'a

val threadspawn : 
  ('a, 'b, 'c, 'd) Analyses.man ->
  multiple:'e ->
  'f ->
  'g ->
  'h ->
  'i ->
  'a

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 ->
  'a * 'l

val add_unique_call_man : 
  ([> `Lifted of Node.t ] as 'a * UniqueCallCounter.t, 'b, 'c, 'd) Analyses.man ->
  'a * 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