sig
type t = Inout_type.t
val self_internal : Project.Computation.t ref
val self_external : Project.Computation.t ref
val compute : (Db_types.kernel_function -> unit) ref
val get_internal : (Db_types.kernel_function -> t) ref
val get_external : (Db_types.kernel_function -> t) ref
val statement : (Cil_types.stmt -> t) ref
val expr : (Cil_types.stmt -> Cil_types.exp -> t) ref
val kinstr : Cil_types.kinstr -> t option
val display : (Format.formatter -> Db_types.kernel_function -> unit) ref
val pretty : Format.formatter -> t -> unit
type t' = Locations.Zone.t
end