Module Domain.MakeSource

Parameters

Signature

include sig ... end
Sourceval with_context : 'a -> 'b -> 'b * 'a
Sourceval is_numerical_var : Mopsa.var -> bool
Sourceval empty_env : Apron.Environment.t
Sourceval print_env : Stdlib.Format.formatter -> Apron.Environment.t -> unit
Sourceval filter_env : (Apron.Var.t -> bool) -> (Apron.Var.t -> bool) -> Apron.Environment.t -> Apron.Environment.t
Sourceval fold_env : (Apron.Var.t -> 'a -> 'a) -> Apron.Environment.t -> 'a -> 'a
Sourceval exists_env : (Apron.Var.t -> bool) -> Apron.Environment.t -> bool
Sourceval gce : Apron.Environment.t -> Apron.Environment.t -> Apron.Environment.t
Sourceval diff : Apron.Environment.t -> Apron.Environment.t -> Apron.Environment.t
Sourceval to_constraints : (ApronManager.t Apron.Abstract1.t * Binding.t) -> ((Apron.Coeff.t * Mopsa.var) list * Apron.Coeff.t * Apron.Lincons1.typ) list
Sourceval constraints_of_var : Mopsa.var -> ((Apron.Coeff.t * Mopsa.var) list * 'a * 'b) list -> ((Apron.Coeff.t * Mopsa.var) list * 'a * 'b) list
Sourceval constant_vars : (ApronManager.t Apron.Abstract1.t * Binding.t) -> Mopsa.var list
Sourceexception UnsupportedExpression
Sourceexception ImpreciseExpression
Sourceval binop_to_apron : Mopsa.operator -> Apron.Texpr1.binop
Sourceval typ_to_apron : Mopsa.typ -> Apron.Texpr1.typ
Sourceval is_env_var : Mopsa.var -> ('a Apron.Abstract1.t * Binding.t) -> bool
Sourceval is_env_var_apron : Apron.Var.t -> 'a Apron.Abstract1.t -> bool
Sourceval remove_tmp : Apron.Var.t list -> ApronManager.t Apron.Abstract1.t -> ApronManager.t Apron.Abstract1.t
Sourceval exp_to_apron : (Mopsa.expr -> bool) -> Mopsa.expr -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> Apron.Var.t list -> Apron.Texpr1.expr * ApronManager.t Apron.Abstract1.t * Binding.t * Apron.Var.t list
Sourceval bexp_to_apron : (Mopsa.expr -> bool) -> Mopsa.expr -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> Apron.Var.t list -> (Apron.Tcons1.typ * Apron.Texpr1.expr * Ast.Typ.typ * Apron.Texpr1.expr * Ast.Typ.typ) Mopsa.Dnf.t * ApronManager.t Apron.Abstract1.t * Binding.t * Apron.Var.t list
Sourceval tcons_array_of_tcons_list : Apron.Environment.t -> Apron.Tcons1.t list -> Apron.Tcons1.earray
Sourcetype t = ApronManager.t Apron.Abstract1.t * Binding.t

Bindings between Mopsa and Apron variables

include sig ... end
val id : t Core__Id.id
val name : string
val debug : ('a, Stdlib.Format.formatter, unit, unit) Stdlib.format4 -> 'a
Sourceval numeric_name : string

Environment utility functions

*********************************

Sourceval unify : ApronManager.t Apron.Abstract1.t -> ApronManager.t Apron.Abstract1.t -> ApronManager.t Apron.Abstract1.t * ApronManager.t Apron.Abstract1.t
Sourceval add_missing_vars : (ApronManager.t Apron.Abstract1.t * Binding.t) -> Mopsa.var list -> ApronManager.t Apron.Abstract1.t * Binding.t

Lattice operators

*********************

Sourceval top : ApronManager.t Apron.Abstract1.t * Binding.t
Sourceval bottom : ApronManager.t Apron.Abstract1.t * Binding.t
Sourceval is_bottom : (ApronManager.t Apron.Abstract1.t * 'a) -> bool
Sourceval subset : (ApronManager.t Apron.Abstract1.t * 'a) -> (ApronManager.t Apron.Abstract1.t * 'b) -> bool
Sourceval join : (ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) -> (ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) -> ApronManager.t Apron.Abstract1.t * Binding.Equiv.t
Sourceval meet : (ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) -> (ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) -> ApronManager.t Apron.Abstract1.t * Binding.Equiv.t
Sourceval widen : 'a -> (ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) -> (ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) -> ApronManager.t Apron.Abstract1.t * Binding.Equiv.t

Transfer functions

**********************

Sourceval init : 'a -> ApronManager.t Apron.Abstract1.t * Binding.t
Sourceval remove_var : Mopsa.var -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> ApronManager.t Apron.Abstract1.t * Binding.Equiv.t
Sourceval forget_var : Mopsa.var -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> ApronManager.t Apron.Abstract1.t * Binding.t
Sourceval merge : ('a * 'b) -> ((ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) * Mopsa.effect) -> ((ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) * Mopsa.effect) -> ApronManager.t Apron.Abstract1.t * Binding.Equiv.t
Sourceval is_var_numeric_type : Mopsa.var -> bool
Sourceval assume : Mopsa.stmt -> (('a, bool) Core.Query.query -> bool) -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> (ApronManager.t Apron.Abstract1.t * Binding.t) option
Sourceval enforce_sign_constraint : Core.All.var -> (('a, bool) Core.Query.query -> bool) -> 'b Core.All.ctx -> Mopsa.range -> (ApronManager.t Apron.Abstract1.t * Binding.t) option -> (ApronManager.t Apron.Abstract1.t * Binding.t) option

Add the sign contraint (if existing) of a given variable into the relationnal domain

Sourceval exec : Mopsa.stmt -> ('a, 'b) Mopsa.Sig.Abstraction.Simplified.simplified_man -> 'c Core.All.ctx -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> (ApronManager.t Apron.Abstract1.t * Binding.Equiv.t) option
Sourceval vars : ('a Apron.Abstract1.t * Binding.t) -> Mopsa.var list
Sourceval ask : 'r. ('a, 'r) Mopsa.query -> ('a, t) Mopsa.Sig.Abstraction.Simplified.simplified_man -> 'a Mopsa.ctx -> t -> 'r option
Sourceval print_state : Mopsa.printer -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> unit
Sourceval print_expr : ('a, 'b) Mopsa.Sig.Abstraction.Simplified.simplified_man -> 'c Core.All.ctx -> (ApronManager.t Apron.Abstract1.t * Binding.t) -> Mopsa.printer -> Ast.Expr.expr -> unit