diff options
Diffstat (limited to 'cfrontend/Cminorgenproof.v')
-rw-r--r-- | cfrontend/Cminorgenproof.v | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/cfrontend/Cminorgenproof.v b/cfrontend/Cminorgenproof.v index ba51310f..0590a602 100644 --- a/cfrontend/Cminorgenproof.v +++ b/cfrontend/Cminorgenproof.v @@ -3021,12 +3021,10 @@ Proof. Qed. Theorem transl_program_correct: - forall (beh: program_behavior), - not_wrong beh -> Csharpminor.exec_program prog beh -> - Cminor.exec_program tprog beh. + forward_simulation (Csharpminor.semantics prog) (Cminor.semantics tprog). Proof. - unfold Csharpminor.exec_program, Cminor.exec_program; intros. - eapply simulation_star_preservation; eauto. + eapply forward_simulation_star; eauto. + eexact symbols_preserved. eexact transl_initial_states. eexact transl_final_states. eexact transl_step_correct. |