Module Frama_c_kernel_base.Sign_val

Sign domain: abstraction of integer numerical values by their signs.

type signs = {
  1. pos : bool;
    (*

    true: maybe positive, false: never positive

    *)
  2. zero : bool;
    (*

    true: maybe zero, false: never zero

    *)
  3. neg : bool;
    (*

    true: maybe negative, false: never negative

    *)
}
include Fclib.Datatype.S with type t = signs
include Fclib.Datatype.S_no_copy with type t = signs
include Fclib.Datatype.Ty with type t = signs
type t = signs
val ty : t Fclib.Type.t
val datatype_name : string

Unique name of the datatype.

val datatype_descr : t Fclib.Descr.t

Datatype descriptor.

val packed_descr : Fclib.Structural_descr.pack

Packed version of the descriptor.

val reprs : t list

List of representants of the descriptor.

val equal : t -> t -> bool

Equality: same spec than Stdlib.(=).

val compare : t -> t -> int

Comparison: same spec than Stdlib.compare.

val hash : t -> int

Hash function: same spec than Hashtbl.hash.

val pretty : Stdlib.Format.formatter -> t -> unit

Pretty print each value in an user-friendly way.

val mem_project : (Fclib.Project_skeleton.t -> bool) -> t -> bool

mem_project f x must return true iff there is a value p of type Project.t in x such that f p returns true.

val copy : t -> t

Deep copy: no possible sharing between x and copy x.

val top : signs
val pos_or_zero : signs
val pos : signs
val neg_or_zero : signs
val neg : signs
val zero : signs
val non_zero : signs
val ge_zero : signs -> bool
val le_zero : signs -> bool
val gt_zero : signs -> bool
val lt_zero : signs -> bool
val inject_int : Fclib.Z.t -> signs
val neg_unop : signs -> signs
val bitwise_not : signs -> signs
val logical_not : signs -> signs
val plus : signs -> signs -> signs
val mul : signs -> signs -> signs
val cdiv : signs -> signs -> signs

Computer division with ACSL like semantics: e / (maybe zero) = top

val cmod : signs -> signs -> signs

Computer modulo with ACSL like semantics: e / (maybe zero) = top

val bitwise_and : signs -> signs -> signs
val bitwise_or : signs -> signs -> signs
val bitwise_xor : signs -> signs -> signs
val bitwise_lsl : signs -> signs -> signs

ACSL like semantics: a << negative = a >> positive

val bitwise_lsr : signs -> signs -> signs

ACSL like semantics: a >> negative = a << positive

val logical_and : signs -> signs -> signs
val logical_or : signs -> signs -> signs