aboutsummaryrefslogtreecommitdiffstats
path: root/arm
diff options
context:
space:
mode:
Diffstat (limited to 'arm')
-rw-r--r--arm/Asmgenproof.v2
-rw-r--r--arm/Constpropproof.v2
-rw-r--r--arm/Selectionproof.v2
3 files changed, 3 insertions, 3 deletions
diff --git a/arm/Asmgenproof.v b/arm/Asmgenproof.v
index f9f4cd0f..7b1fd62c 100644
--- a/arm/Asmgenproof.v
+++ b/arm/Asmgenproof.v
@@ -1173,7 +1173,7 @@ Proof.
Qed.
Theorem transf_program_correct:
- forall (beh: program_behavior),
+ forall (beh: program_behavior), not_wrong beh ->
Machconcr.exec_program prog beh -> Asm.exec_program tprog beh.
Proof.
unfold Machconcr.exec_program, Asm.exec_program; intros.
diff --git a/arm/Constpropproof.v b/arm/Constpropproof.v
index 7c7b8788..08c5baf3 100644
--- a/arm/Constpropproof.v
+++ b/arm/Constpropproof.v
@@ -947,7 +947,7 @@ Qed.
[Smallstep.simulation_step_preservation]. *)
Theorem transf_program_correct:
- forall (beh: program_behavior),
+ forall (beh: program_behavior), not_wrong beh ->
exec_program prog beh -> exec_program tprog beh.
Proof.
unfold exec_program; intros.
diff --git a/arm/Selectionproof.v b/arm/Selectionproof.v
index 967e2292..cf7613b6 100644
--- a/arm/Selectionproof.v
+++ b/arm/Selectionproof.v
@@ -1446,7 +1446,7 @@ Proof.
Qed.
Theorem transf_program_correct:
- forall (beh: program_behavior),
+ forall (beh: program_behavior), not_wrong beh ->
Cminor.exec_program prog beh -> CminorSel.exec_program tprog beh.
Proof.
unfold CminorSel.exec_program, Cminor.exec_program; intros.