diff options
Diffstat (limited to 'backend/CleanupLabelsproof.v')
-rw-r--r-- | backend/CleanupLabelsproof.v | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/backend/CleanupLabelsproof.v b/backend/CleanupLabelsproof.v index abd2581d..a7a60f6c 100644 --- a/backend/CleanupLabelsproof.v +++ b/backend/CleanupLabelsproof.v @@ -324,11 +324,10 @@ Proof. Qed. Theorem transf_program_correct: - forall (beh: program_behavior), not_wrong beh -> - exec_program prog beh -> LTLin.exec_program tprog beh. + forward_simulation (LTLin.semantics prog) (LTLin.semantics tprog). Proof. - unfold exec_program; intros. - eapply simulation_opt_preservation; eauto. + eapply forward_simulation_opt. + eexact symbols_preserved. eexact transf_initial_states. eexact transf_final_states. eexact transf_step_correct. |