diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-07-15 08:26:16 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-07-15 08:26:16 +0000 |
commit | 93b89122000e42ac57abc39734fdf05d3a89e83c (patch) | |
tree | 43bbde048cff6f58ffccde99b862dce0891b641d /backend/CastOptimproof.v | |
parent | 5fccbcb628c5282cf1b13077d5eeccf497d58c38 (diff) | |
download | compcert-93b89122000e42ac57abc39734fdf05d3a89e83c.tar.gz compcert-93b89122000e42ac57abc39734fdf05d3a89e83c.zip |
Merge of branch new-semantics: revised and strengthened top-level statements of semantic preservation.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1683 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/CastOptimproof.v')
-rw-r--r-- | backend/CastOptimproof.v | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/backend/CastOptimproof.v b/backend/CastOptimproof.v index ab04d0eb..0afc208c 100644 --- a/backend/CastOptimproof.v +++ b/backend/CastOptimproof.v @@ -560,15 +560,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. |