module Register:sig
..end
module Service:Service_graph.Make
(
sig
val datatype_name :string
typet =
Callgraph.callgraph
module V:sig
..end
val iter_vertex :('a -> unit) -> ('b, 'a) Hashtbl.t -> unit
val iter_succ :(Callgraph.callnode -> unit) -> 'a -> Callgraph.callnode -> unit
val iter_pred :(Callgraph.callnode -> unit) -> 'a -> Callgraph.callnode -> unit
val fold_pred :(Callgraph.callnode -> 'a -> 'a) -> 'b -> Callgraph.callnode -> 'a -> 'a
val in_degree :'a -> Callgraph.callnode -> int
end
)
module CG:Computation.OptionRef
(
Service.CallG.Datatype
)
(
sig
val name :string
val dependencies :Project.Computation.t list
end
)
val get_init_funcs : (Parameters.MainFunction.t, Callgraph.callnode) Hashtbl.t ->
Cilutil.StringSet.t
val compute : unit -> Service.CallG.t
val get : unit -> CG.data
val dump : unit -> unit