diff options
Diffstat (limited to 'backend/Constpropproof.v')
-rw-r--r-- | backend/Constpropproof.v | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/backend/Constpropproof.v b/backend/Constpropproof.v index d534c756..058d68ef 100644 --- a/backend/Constpropproof.v +++ b/backend/Constpropproof.v @@ -468,15 +468,13 @@ Proof. Qed. (** The preservation of the observable behavior of the program then - follows, using the generic preservation theorem - [Smallstep.simulation_step_preservation]. *) + follows. *) Theorem transf_program_correct: - forall (beh: program_behavior), not_wrong beh -> - exec_program prog beh -> exec_program tprog beh. + forward_simulation (RTL.semantics prog) (RTL.semantics tprog). Proof. - unfold exec_program; intros. - eapply simulation_step_preservation; eauto. + eapply forward_simulation_step. + eexact symbols_preserved. eexact transf_initial_states. eexact transf_final_states. exact transf_step_correct. |