aboutsummaryrefslogtreecommitdiffstats
path: root/backend/Stackingproof.v
diff options
context:
space:
mode:
Diffstat (limited to 'backend/Stackingproof.v')
-rw-r--r--backend/Stackingproof.v7
1 files changed, 3 insertions, 4 deletions
diff --git a/backend/Stackingproof.v b/backend/Stackingproof.v
index fbe88823..a2c8ecd5 100644
--- a/backend/Stackingproof.v
+++ b/backend/Stackingproof.v
@@ -2701,11 +2701,10 @@ Proof.
Qed.
Theorem transf_program_correct:
- forall (beh: program_behavior), not_wrong beh ->
- Linear.exec_program prog beh -> Machsem.exec_program tprog beh.
+ forward_simulation (Linear.semantics prog) (Machsem.semantics tprog).
Proof.
- unfold Linear.exec_program, Machsem.exec_program; intros.
- eapply simulation_plus_preservation; eauto.
+ eapply forward_simulation_plus.
+ eexact symbols_preserved.
eexact transf_initial_states.
eexact transf_final_states.
eexact transf_step_correct.