diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-03-28 11:13:49 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-03-28 11:13:49 +0000 |
| commit | 9f95f9d59057ac914efe982aa501c6deeb241988 (patch) | |
| tree | 14f221d82dec99985c20ce0a936d2bcd8452aa62 | |
| parent | eba76137f095d882583644d1c682320c180e832d (diff) | |
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.v | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/backend/Machabstr2concr.v b/backend/Machabstr2concr.v index 7714f3d..b766ed0 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. |