TaintSpecification.AccessTree
module TraceDomain : sig ... end
module AccessMap : sig ... end
module BaseMap = Absint.AccessPath.BaseMap
type node = TraceDomain.t * tree
val pp : IStdlib__PrettyPrintable.F.formatter -> t -> unit
val bottom : t
val is_bottom : t -> bool
val empty_node : node
val make_node : TraceDomain.t -> node AccessMap.t -> node
val make_access_node :
TraceDomain.t ->
Absint.AccessPath.access ->
TraceDomain.t ->
node
val make_normal_leaf : TraceDomain.t -> node
val make_starred_leaf : TraceDomain.t -> node
val get_node : Absint.AccessPath.Abs.t -> t -> node option
val get_trace : Absint.AccessPath.Abs.t -> t -> TraceDomain.t option
val add_node : Absint.AccessPath.Abs.t -> node -> t -> t
val add_trace : Absint.AccessPath.Abs.t -> TraceDomain.t -> t -> t
val fold : ('a -> Absint.AccessPath.Abs.t -> node -> 'a) -> t -> 'a -> 'a
val trace_fold :
('a -> Absint.AccessPath.Abs.t -> TraceDomain.t -> 'a) ->
t ->
'a ->
'a
val exists : (Absint.AccessPath.Abs.t -> node -> bool) -> t -> bool
val iter : (Absint.AccessPath.Abs.t -> node -> unit) -> t -> unit
val depth : t -> int
val pp_node : Stdlib.Format.formatter -> node -> unit