aboutsummaryrefslogtreecommitdiffstats
path: root/backend/CSE2proof.v
diff options
context:
space:
mode:
authorDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2020-02-05 17:27:57 +0100
committerDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2020-02-05 17:27:57 +0100
commitbc89c7487901c6056c84bf598ea4ab6535de68c2 (patch)
treed8053e44d7bc38e1af0bf6a774ea189ea3f1b3c0 /backend/CSE2proof.v
parent56dc34adcd147d8ac29f57edc9da1718a493dcce (diff)
downloadcompcert-kvx-bc89c7487901c6056c84bf598ea4ab6535de68c2.tar.gz
compcert-kvx-bc89c7487901c6056c84bf598ea4ab6535de68c2.zip
wellformed_reg_kill_reg simpliied
Diffstat (limited to 'backend/CSE2proof.v')
-rw-r--r--backend/CSE2proof.v11
1 files changed, 3 insertions, 8 deletions
diff --git a/backend/CSE2proof.v b/backend/CSE2proof.v
index e62e2ae6..3799e38b 100644
--- a/backend/CSE2proof.v
+++ b/backend/CSE2proof.v
@@ -317,14 +317,9 @@ Proof.
specialize Hrel with (i := i) (j := j) (sv := sv).
destruct ((var_to_sym rel) ! dst) eqn:DST; simpl.
{
- destruct (in_or_not j (referenced_by s)).
- { assert (dst <> i) by eauto with wellformed.
- apply remove_from_sets_pass.
- congruence.
- rewrite PTree.gro by congruence.
- apply Hrel; trivial.
- }
- rewrite remove_from_sets_notin by assumption.
+ assert (dst <> i) by eauto with wellformed.
+ apply remove_from_sets_pass.
+ congruence.
rewrite PTree.gro by congruence.
apply Hrel; trivial.
}