aboutsummaryrefslogtreecommitdiffstats
path: root/backend/CSEproof.v
diff options
context:
space:
mode:
Diffstat (limited to 'backend/CSEproof.v')
-rw-r--r--backend/CSEproof.v12
1 files changed, 3 insertions, 9 deletions
diff --git a/backend/CSEproof.v b/backend/CSEproof.v
index 684729d4..209fa40f 100644
--- a/backend/CSEproof.v
+++ b/backend/CSEproof.v
@@ -1151,9 +1151,7 @@ Proof.
econstructor. split.
eapply exec_Iload; eauto.
- rewrite eval_addressing_preserved with (ge1 := ge).
- exact Ha'1.
- exact symbols_preserved.
+ try (rewrite eval_addressing_preserved with (ge1 := ge) by assumption).
econstructor; eauto.
eapply analysis_correct_1; eauto. simpl; eauto.
@@ -1204,9 +1202,7 @@ Proof.
{
econstructor. split.
eapply exec_Iload; eauto.
- rewrite eval_addressing_preserved with (ge1 := ge).
- exact Ha'1.
- exact symbols_preserved.
+ try (rewrite eval_addressing_preserved with (ge1 := ge) by assumption).
econstructor; eauto.
eapply analysis_correct_1; eauto. simpl; eauto.
@@ -1220,9 +1216,7 @@ Proof.
{
econstructor. split.
eapply exec_Iload_notrap2; eauto.
- rewrite eval_addressing_preserved with (ge1 := ge).
- exact Ha'1.
- exact symbols_preserved.
+ try (rewrite eval_addressing_preserved with (ge1 := ge) by assumption).
econstructor; eauto.
eapply analysis_correct_1; eauto. simpl; eauto.