summaryrefslogtreecommitdiff
path: root/backend/Constpropproof.v
diff options
context:
space:
mode:
Diffstat (limited to 'backend/Constpropproof.v')
-rw-r--r--backend/Constpropproof.v5
1 files changed, 5 insertions, 0 deletions
diff --git a/backend/Constpropproof.v b/backend/Constpropproof.v
index 580d551..a6385f4 100644
--- a/backend/Constpropproof.v
+++ b/backend/Constpropproof.v
@@ -186,6 +186,11 @@ Proof.
destruct chunk; simpl; auto.
congruence.
eapply IHil; eauto. omega.
+ (* Init_int64 *)
+ destruct H. destruct (zeq pos 0). subst. rewrite Zplus_0_r in H0.
+ destruct chunk; simpl; auto.
+ congruence.
+ eapply IHil; eauto. omega.
(* Init_float32 *)
destruct H. destruct (zeq pos 0). subst. rewrite Zplus_0_r in H0.
destruct chunk; simpl; auto. destruct (propagate_float_constants tt); simpl; auto.