Module BO.BufferOverrunField
Inferbo-specific constant field names
val pp : pp_lhs:(Stdlib.Format.formatter -> 'a -> unit) -> sep:string -> Stdlib.Format.formatter -> 'a -> IR.Fieldname.t -> unit
A parameterized pretty printer for field appended values
val get_type : IR.Fieldname.t -> IR.Typ.t option
Get type of field that is constructed in this module. This does not work in Java at the moment.
val c_strlen : unit -> IR.Fieldname.t
Field for C string's length
val cpp_vector_elem : vec_typ:IR.Typ.t -> elt_typ:IR.Typ.t -> IR.Fieldname.t
Field for C++ vector's elements
val java_collection_internal_array : IR.Fieldname.t
Field for Java collection's elements
val java_linked_list_index : IR.Fieldname.t
Virtual field for index of Java's linked list
val java_linked_list_length : IR.Fieldname.t
Virtual field for length of Java's linked list
val java_linked_list_next : IR.Typ.t -> IR.Fieldname.t
Virtual field for next of Java's linked list
val java_list_files_length : IR.Fieldname.t
Virtual field for length of Java's files list in a directory
val is_cpp_vector_elem : IR.Fieldname.t -> bool
Check if the field is for C++ vector's elements
val is_java_collection_internal_array : IR.Fieldname.t -> bool
Check if the field is for Java collection's elements
val objc_collection_internal_array : IR.Fieldname.t
Field for ObjC's collection's elements
val objc_iterator_offset : IR.Fieldname.t
Field for ObjC's nscollection's iterator offset
Field domain constructor
type field_typ
= IR.Typ.t option
type 'prim t
=
|
Prim of 'prim
|
Field of
{
prefix : 'prim t;
fn : IR.Fieldname.t;
typ : field_typ;
}
|
StarField of
{
prefix : 'prim t;
last_field : IR.Fieldname.t;
}
Represents a path starting with
prefix
and ending with the fieldlast_field
, the middle can be anything. Invariants:- There is at most one StarField
- StarField excluded, there are no duplicate fieldnames
- StarField can only be followed by Deref elements
val mk_append_field : prim_append_field:(?typ:IR.Typ.t -> 'prim t -> IR.Fieldname.t -> (depth:int -> 'prim t -> 'prim t) -> int -> 'prim -> 'prim t) -> prim_append_star_field:('prim t -> IR.Fieldname.t -> ('prim t -> 'prim t) -> 'prim -> 'prim t) -> ?typ:IR.Typ.t -> 'prim t -> IR.Fieldname.t -> 'prim t
val mk_append_star_field : prim_append_star_field:('prim t -> IR.Fieldname.t -> ('prim t -> 'prim t) -> 'prim -> 'prim t) -> 'prim t -> IR.Fieldname.t -> 'prim t