sig
exception Use_Main_Memory
type tt
module type Model_S =
sig
type t
val ty : t Type.t
val name : string
val descr : t Descr.t
val packed_descr : Structural_descr.pack
val reprs : t list
val equal : t -> t -> bool
val compare : t -> t -> int
val hash : t -> int
val pretty_code : Format.formatter -> t -> unit
val internal_pretty_code :
Type.precedence -> Format.formatter -> t -> unit
val pretty : Format.formatter -> t -> unit
val varname : t -> string
val mem_project : (Project_skeleton.t -> bool) -> t -> bool
val copy : t -> t
type widen_hint = Cvalue_type.Model.widen_hint
type cluster
val is_reachable : t -> bool
val pretty_without_null : Format.formatter -> t -> unit
val pretty_filter :
Format.formatter -> t -> Locations.Zone.t -> (Base.t -> bool) -> unit
val join : t -> t -> t
val find :
conflate_bottom:bool ->
with_alarms:CilE.warn_mode ->
t -> Locations.location -> Locations.Location_Bytes.t
val find_unspecified :
with_alarms:CilE.warn_mode ->
t -> Locations.location -> Cvalue_type.V_Or_Uninitialized.t
val add_binding :
with_alarms:CilE.warn_mode ->
exact:bool ->
t -> Locations.location -> Locations.Location_Bytes.t -> t
val add_binding_unspecified : t -> Locations.location -> t
val reduce_binding :
t -> Locations.location -> Locations.Location_Bytes.t -> t
val is_included : t -> t -> bool
val is_included_actual_generic :
Locations.Zone.t -> t -> t -> Locations.Location_Bytes.t Base.Map.t
val widen : Relations_type.Model_S.widen_hint -> t -> t -> bool * t
val bottom : t
val inject : Cvalue_type.Model.t -> t
val empty_map : t
val top : t
val is_top : t -> bool
val value_state : t -> Cvalue_type.Model.t
val drop_relations : t -> t
val filter_base : (Base.t -> bool) -> t -> t
val remove_base : Base.t -> t -> t
val clear_state_from_locals : Cil_types.fundec -> t -> t
val uninitialize_locals : Cil_types.block list -> t -> t
val compute_actual_final_from_generic :
t ->
t ->
Locations.Zone.t ->
Cvalue_type.Model.instanciation ->
t * Locations.Location_Bits.Top_Param.t
val is_included_by_location_enum : t -> t -> Locations.Zone.t -> bool
val find_mem :
Locations.location -> Int_Base.t -> Ival.t -> t -> Cvalue_type.V.t
val add_mem :
Locations.location ->
Int_Base.t ->
Ival.t ->
t -> Cvalue_type.V.t -> Relations_type.Model_S.cluster list * t
val propagate_change_from_real_to_virt :
protected_clusters:Relations_type.Model_S.cluster list ->
Locations.location -> t -> Cvalue_type.V.t -> t
val add_equality :
?offset:Ival.t -> t -> Locations.location -> Locations.location -> t
val reduce_equality :
t -> Locations.location -> Locations.location -> t
val compute_diff :
t -> Locations.location -> Locations.location -> Cvalue_type.V.t
val shift_location :
t -> Locations.location -> Ival.t -> Cvalue_type.V.t -> t
val find_base : Base.t -> t -> Cvalue_type.V_Offsetmap.t
val create_initial :
base:Base.t ->
v:Cvalue_type.V.t -> modu:Abstract_interp.Int.t -> state:t -> t
val paste_offsetmap :
Cvalue_type.V_Offsetmap.t ->
Locations.Location_Bits.t ->
Abstract_interp.Int.t -> Abstract_interp.Int.t -> t -> t
val copy_paste : Locations.location -> Locations.location -> t -> t
val copy_from_virtual :
Locations.location ->
Ival.t -> Abstract_interp.Int.t -> t -> Cvalue_type.V_Offsetmap.t
val copy_offsetmap :
with_alarms:CilE.warn_mode ->
Locations.location -> t -> Cvalue_type.V_Offsetmap.t option
val comp_prefixes : t -> t -> unit
val find_prefix :
t -> Hptmap.prefix -> Cvalue_type.Model.subtree option
end
module Model :
sig
type t = Cvalue_type.Model.t * tt
val ty : t Type.t
val name : string
val descr : t Descr.t
val packed_descr : Structural_descr.pack
val reprs : t list
val equal : t -> t -> bool
val compare : t -> t -> int
val hash : t -> int
val pretty_code : Format.formatter -> t -> unit
val internal_pretty_code :
Type.precedence -> Format.formatter -> t -> unit
val pretty : Format.formatter -> t -> unit
val varname : t -> string
val mem_project : (Project_skeleton.t -> bool) -> t -> bool
val copy : t -> t
type widen_hint = Cvalue_type.Model.widen_hint
type cluster
val is_reachable : t -> bool
val pretty_without_null : Format.formatter -> t -> unit
val pretty_filter :
Format.formatter -> t -> Locations.Zone.t -> (Base.t -> bool) -> unit
val join : t -> t -> t
val find :
conflate_bottom:bool ->
with_alarms:CilE.warn_mode ->
t -> Locations.location -> Locations.Location_Bytes.t
val find_unspecified :
with_alarms:CilE.warn_mode ->
t -> Locations.location -> Cvalue_type.V_Or_Uninitialized.t
val add_binding :
with_alarms:CilE.warn_mode ->
exact:bool ->
t -> Locations.location -> Locations.Location_Bytes.t -> t
val add_binding_unspecified : t -> Locations.location -> t
val reduce_binding :
t -> Locations.location -> Locations.Location_Bytes.t -> t
val is_included : t -> t -> bool
val is_included_actual_generic :
Locations.Zone.t -> t -> t -> Locations.Location_Bytes.t Base.Map.t
val widen : widen_hint -> t -> t -> bool * t
val bottom : t
val inject : Cvalue_type.Model.t -> t
val empty_map : t
val top : t
val is_top : t -> bool
val value_state : t -> Cvalue_type.Model.t
val drop_relations : t -> t
val filter_base : (Base.t -> bool) -> t -> t
val remove_base : Base.t -> t -> t
val clear_state_from_locals : Cil_types.fundec -> t -> t
val uninitialize_locals : Cil_types.block list -> t -> t
val compute_actual_final_from_generic :
t ->
t ->
Locations.Zone.t ->
Cvalue_type.Model.instanciation ->
t * Locations.Location_Bits.Top_Param.t
val is_included_by_location_enum : t -> t -> Locations.Zone.t -> bool
val find_mem :
Locations.location -> Int_Base.t -> Ival.t -> t -> Cvalue_type.V.t
val add_mem :
Locations.location ->
Int_Base.t -> Ival.t -> t -> Cvalue_type.V.t -> cluster list * t
val propagate_change_from_real_to_virt :
protected_clusters:cluster list ->
Locations.location -> t -> Cvalue_type.V.t -> t
val add_equality :
?offset:Ival.t -> t -> Locations.location -> Locations.location -> t
val reduce_equality :
t -> Locations.location -> Locations.location -> t
val compute_diff :
t -> Locations.location -> Locations.location -> Cvalue_type.V.t
val shift_location :
t -> Locations.location -> Ival.t -> Cvalue_type.V.t -> t
val find_base : Base.t -> t -> Cvalue_type.V_Offsetmap.t
val create_initial :
base:Base.t ->
v:Cvalue_type.V.t -> modu:Abstract_interp.Int.t -> state:t -> t
val paste_offsetmap :
Cvalue_type.V_Offsetmap.t ->
Locations.Location_Bits.t ->
Abstract_interp.Int.t -> Abstract_interp.Int.t -> t -> t
val copy_paste : Locations.location -> Locations.location -> t -> t
val copy_from_virtual :
Locations.location ->
Ival.t -> Abstract_interp.Int.t -> t -> Cvalue_type.V_Offsetmap.t
val copy_offsetmap :
with_alarms:CilE.warn_mode ->
Locations.location -> t -> Cvalue_type.V_Offsetmap.t option
val comp_prefixes : t -> t -> unit
val find_prefix :
t -> Hptmap.prefix -> Cvalue_type.Model.subtree option
end
end