diff options
| author | Alex Auvolat <alex.auvolat@ansys.com> | 2014-06-30 12:22:31 +0200 |
|---|---|---|
| committer | Alex Auvolat <alex.auvolat@ansys.com> | 2014-06-30 12:22:31 +0200 |
| commit | c1e4836cd21b5707af927a916350e82c9fa7de11 (patch) | |
| tree | 27f97edbc553f229f4aeea9b4a4a18d8951eb152 /abstract/apron_domain.ml | |
| parent | ea25c6e61f585b263d3eac44a463e37116ce1e7f (diff) | |
| download | scade-analyzer-c1e4836cd21b5707af927a916350e82c9fa7de11.tar.gz scade-analyzer-c1e4836cd21b5707af927a916350e82c9fa7de11.zip | |
Reached interesting point in BDD implementation.
Diffstat (limited to 'abstract/apron_domain.ml')
| -rw-r--r-- | abstract/apron_domain.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/abstract/apron_domain.ml b/abstract/apron_domain.ml index 7a823db..45803fc 100644 --- a/abstract/apron_domain.ml +++ b/abstract/apron_domain.ml @@ -71,6 +71,7 @@ module ND : NUMERICAL_ENVIRONMENT_DOMAIN = struct Abstract1.top manager (v_env vars) let bottom vars = Abstract1.bottom manager (v_env vars) let is_bot = Abstract1.is_bottom manager + let is_top = Abstract1.is_top manager let forgetvar x id = let v = [| Var.of_string id |] in |