summaryrefslogtreecommitdiff
path: root/arm/ConstpropOpproof.v
diff options
context:
space:
mode:
Diffstat (limited to 'arm/ConstpropOpproof.v')
-rw-r--r--arm/ConstpropOpproof.v2
1 files changed, 2 insertions, 0 deletions
diff --git a/arm/ConstpropOpproof.v b/arm/ConstpropOpproof.v
index 9778ace..3f98b88 100644
--- a/arm/ConstpropOpproof.v
+++ b/arm/ConstpropOpproof.v
@@ -141,6 +141,8 @@ Proof.
rewrite <- H3. replace v0 with (Vfloat n1). reflexivity. congruence.
+ inv H4. destruct (Float.intoffloat f); simpl in H0; inv H0. red; auto.
+
caseEq (eval_static_condition c vl0).
intros. generalize (eval_static_condition_correct _ _ _ _ H H1).
intro. rewrite H2 in H0.