TracingPriv (goblint.Goblint_lib.RelationPriv.TracingPriv)

Parameters

module Priv : S

module RD : RelationDomain.RD

Signature

module Priv : sig ... end

include module type of struct include Priv end

module G = Priv.G

module V = Priv.V

module P = Priv.P

Path-representative.

val name : unit -> string

val startstate : unit -> Priv.D.t

val iter_sys_vars : (V.t -> G.t) -> VarQuery.t -> V.t VarQuery.f -> unit

Queries.IterSysVars for apron.

val invariant_global : Queries.ask -> (V.t -> G.t) -> V.t -> Invariant.t

Returns flow-insensitive invariant for global unknown.

val invariant_vars : 
  Queries.ask ->
  (V.t -> G.t) ->
  RelationDomain.RelComponents(RD)(Priv.D).t ->
  GoblintCil.varinfo list

Returns global variables which are privatized.

val init : unit -> unit

val finalize : unit -> unit

module D = Priv.D

module RelComponents : sig ... end

val read_global : 
  Queries.ask ->
  (V.t -> G.t) ->
  RelComponents.t ->
  CilType.Varinfo.t ->
  CilType.Varinfo.t ->
  RD.t

val write_global : 
  ?invariant:bool ->
  Queries.ask ->
  (V.t -> G.t) ->
  (V.t -> G.t -> unit) ->
  RelComponents.t ->
  CilType.Varinfo.t ->
  CilType.Varinfo.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val lock : 
  Queries.ask ->
  (V.t -> G.t) ->
  RelComponents.t ->
  LockDomain.MustLock.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val unlock : 
  Queries.ask ->
  (V.t -> G.t) ->
  (V.t -> G.t -> unit) ->
  RelComponents.t ->
  LockDomain.MustLock.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val enter_multithreaded : 
  Queries.ask ->
  (V.t -> G.t) ->
  (V.t -> G.t -> unit) ->
  RelComponents.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val threadenter : 
  Queries.ask ->
  (V.t -> G.t) ->
  RelComponents.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val sync : 
  Queries.ask ->
  (V.t -> G.t) ->
  (V.t -> G.t -> unit) ->
  RelComponents.t ->
  [ `Init
  | `Join
  | `JoinCall of CilType.Fundec.t
  | `Normal
  | `Return
  | `Thread ] ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val escape : 
  Node.t ->
  Queries.ask ->
  (V.t -> G.t) ->
  (V.t -> G.t -> unit) ->
  RelComponents.t ->
  EscapeDomain.EscapedVars.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val thread_join : 
  ?force:bool ->
  Queries.ask ->
  (V.t -> G.t) ->
  GoblintCil.Cil.exp ->
  RelComponents.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t

val thread_return : 
  Queries.ask ->
  (V.t -> G.t) ->
  (V.t -> G.t -> unit) ->
  ThreadIdDomain.Thread.t ->
  RelComponents.t ->
  RelationDomain.RelComponents(RD)(Priv.D).t