aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2010-03-28 11:13:49 +0000
committerxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2010-03-28 11:13:49 +0000
commit9f95f9d59057ac914efe982aa501c6deeb241988 (patch)
tree14f221d82dec99985c20ce0a936d2bcd8452aa62
parenteba76137f095d882583644d1c682320c180e832d (diff)
downloadcompcert-9f95f9d59057ac914efe982aa501c6deeb241988.tar.gz
compcert-9f95f9d59057ac914efe982aa501c6deeb241988.zip
More resistant proof
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1296 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
-rw-r--r--backend/Machabstr2concr.v1
1 files changed, 0 insertions, 1 deletions
diff --git a/backend/Machabstr2concr.v b/backend/Machabstr2concr.v
index 7714f3d5..b766ed0d 100644
--- a/backend/Machabstr2concr.v
+++ b/backend/Machabstr2concr.v
@@ -231,7 +231,6 @@ Proof.
inv H4.
assert (Some v1 = Some (Val.load_result (chunk_of_type ty) v')).
rewrite <- LOAD1. eapply Mem.load_store_same; eauto.
- replace (type_of_chunk (chunk_of_type ty)) with ty. auto.
destruct ty; auto.
inv H4. rewrite load_result_ty; auto.
auto.