aboutsummaryrefslogtreecommitdiffstats
path: root/backend/CleanupLabelsproof.v
diff options
context:
space:
mode:
Diffstat (limited to 'backend/CleanupLabelsproof.v')
-rw-r--r--backend/CleanupLabelsproof.v4
1 files changed, 3 insertions, 1 deletions
diff --git a/backend/CleanupLabelsproof.v b/backend/CleanupLabelsproof.v
index f952f1ea..d48a0553 100644
--- a/backend/CleanupLabelsproof.v
+++ b/backend/CleanupLabelsproof.v
@@ -296,7 +296,9 @@ Proof.
econstructor; eauto with coqlib.
(* Lannot *)
left; econstructor; split.
- econstructor; eauto. eapply external_call_symbols_preserved'; eauto.
+ econstructor; eauto.
+ eapply eval_annot_args_preserved with (ge1 := ge); eauto. exact symbols_preserved.
+ eapply external_call_symbols_preserved; eauto.
exact symbols_preserved. exact public_preserved. exact varinfo_preserved.
econstructor; eauto with coqlib.
(* Llabel *)