module type Mark =sig..end
Type of the module that the user has to provide to describe the marks.
type t
type call_info
unit if there is nothing to store for the calls.
(see PdgIndex.FctIndex for more information)
val is_bottom : t -> boolcombine result (see below)val merge : t -> t -> tval combine : t -> t -> t * tcombine is used during propagation. It should return
(new_mark, mark_to_prop) = combine old_mak new_mark
where new_mark is the mark to associate with the node,
and mark_to_prop the mark to propagate to its dependencies.
If is_bottom mark_to_prop, the propagation is stopped.
val pretty : Format.formatter -> t -> unit