Functor SlicingTransform.Visibility

module Visibility: 
functor (SliceName : sig
val get : Cil_types.kernel_function -> bool -> int -> string
end) -> sig .. end
Parameters:
SliceName : sig val get : kernel_function -> bool -> int -> string end

exception EraseAssigns
exception EraseAllocation
type proj = SlicingInternals.project 
type transform = {
   slice : SlicingInternals.fct_slice;
   src_visible : bool;
   keep_body : bool;
}
type fct = 
| Iff of transform
| Isrc of bool
| Iproto
val keep_body : Kernel_function.t -> bool
val fct_info : SlicingInternals.project ->
Kernel_function.t -> fct list
val fct_name : Cil_datatype.Varinfo.t -> fct -> string
val visible_mark : Db.Slicing.Mark.t -> bool
val param_visible : fct -> int -> bool
val body_visible : fct -> bool
val inst_visible : fct -> Cil_types.stmt -> bool
val label_visible : fct -> Cil_types.stmt -> Cil_types.label -> bool
val data_in_visible : SlicingInternals.fct_slice -> Locations.Zone.t option -> bool
val all_nodes_visible : SlicingInternals.fct_slice -> PdgTypes.Node.t list -> bool
exception NoDataInfo
val data_nodes_visible : SlicingInternals.fct_slice ->
PdgTypes.Node.t list *
((PdgTypes.Node.t * Locations.Zone.t option) list * Locations.Zone.t option)
option -> bool
val annotation_visible : fct ->
Cil_types.stmt -> Cil_types.code_annotation -> bool
val fun_precond_visible : fct -> Cil_types.predicate -> bool
val fun_postcond_visible : fct -> Cil_types.predicate -> bool
val fun_variant_visible : fct -> Cil_types.term -> bool
val fun_frees_visible : fct -> Cil_types.identified_term -> bool
val fun_allocates_visible : fct -> Cil_types.identified_term -> bool
val fun_assign_visible : fct ->
Cil_types.identified_term * Cil_types.identified_term Cil_types.deps -> bool
val fun_deps_visible : fct -> Cil_types.identified_term -> bool
val loc_var_visible : fct -> Cil_types.varinfo -> bool
val res_call_visible : fct -> Cil_types.stmt -> bool
val result_visible : 'a -> fct -> bool
val called_info : SlicingInternals.project * fct ->
Cil_types.stmt ->
(Cil_types.kernel_function * fct) option
val cond_edge_visible : 'a -> Cil_types.stmt -> bool * bool