summaryrefslogtreecommitdiff
path: root/ia32/Asmgenproof1.v
diff options
context:
space:
mode:
Diffstat (limited to 'ia32/Asmgenproof1.v')
-rw-r--r--ia32/Asmgenproof1.v8
1 files changed, 0 insertions, 8 deletions
diff --git a/ia32/Asmgenproof1.v b/ia32/Asmgenproof1.v
index 5d3df67..6f2aee5 100644
--- a/ia32/Asmgenproof1.v
+++ b/ia32/Asmgenproof1.v
@@ -997,10 +997,6 @@ Proof.
auto. decEq. apply Pregmap.gso; auto with asmgen.
exists rs2. split.
destruct chunk; ArgsInv; apply exec_straight_one; auto.
- (* Mfloat64 -> Mfloat64al32 *)
- rewrite <- H. simpl. unfold exec_load. rewrite H1.
- destruct (eval_addrmode ge x rs); simpl in *; try discriminate.
- erewrite Mem.load_float64al32; eauto.
split. unfold rs2. rewrite nextinstr_nf_inv1. Simplifs. apply preg_of_data.
intros. unfold rs2. Simplifs.
Qed.
@@ -1047,10 +1043,6 @@ Proof.
intros. Transparent destroyed_by_store. simpl in H2. simpl. Simplifs.
(* float64 *)
econstructor; split.
- apply exec_straight_one. simpl. unfold exec_store. erewrite Mem.storev_float64al32; eauto. auto.
- intros. Simplifs.
-(* float64al32 *)
- econstructor; split.
apply exec_straight_one. simpl. unfold exec_store. rewrite H1. eauto. auto.
intros. Simplifs.
Qed.