diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-11-26 16:24:01 +0100 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-11-26 16:24:01 +0100 |
| commit | 3c670f954dc470333e94932279e02e6940ff9f15 (patch) | |
| tree | 2cbe571ba6e62d3517551ff18d8fb0ce44591cfe /backend/CSE3analysisaux.ml | |
| parent | 01f0108df437df0792ac560f630e7969be76b60b (diff) | |
| download | compcert-kvx-3c670f954dc470333e94932279e02e6940ff9f15.tar.gz compcert-kvx-3c670f954dc470333e94932279e02e6940ff9f15.zip | |
is_condition_present_sound
Diffstat (limited to 'backend/CSE3analysisaux.ml')
| -rw-r--r-- | backend/CSE3analysisaux.ml | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/backend/CSE3analysisaux.ml b/backend/CSE3analysisaux.ml index e8964090..1642a269 100644 --- a/backend/CSE3analysisaux.ml +++ b/backend/CSE3analysisaux.ml @@ -199,7 +199,6 @@ let preanalysis (tenv : typing_env) (f : RTL.coq_function) = and cur_catalog = ref PTree.empty and eq_table = Hashtbl.create 100 and rhs_table = Hashtbl.create 100 - and cond_table = Hashtbl.create 100 and cur_kill_reg = ref (PMap.init PSet.empty) and cur_kill_mem = ref PSet.empty and cur_kill_store = ref PSet.empty @@ -239,9 +238,7 @@ let preanalysis (tenv : typing_env) (f : RTL.coq_function) = | Flat_equ(flat_eq_lhs, flat_eq_op, flat_eq_args) -> add_to_set_in_table rhs_table (flat_eq_op, flat_eq_args) coq_id - | Flat_cond(flat_eq_cond, flat_eq_args) -> - add_to_set_in_table cond_table - (flat_eq_cond, flat_eq_args) coq_id); + | Flat_cond(flat_eq_cond, flat_eq_args) -> ()); (match eq with | Equ(lhs, sop, args) -> List.iter |