diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-06-28 07:59:03 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-06-28 07:59:03 +0000 |
| commit | 5312915c1b29929f82e1f8de80609a277584913f (patch) | |
| tree | 0f7ee475743f0eb05d352148a9e1f0b861ee9d34 /common | |
| parent | f3250c32ff42ae18fd03a5311c1f0caec3415aba (diff) | |
Use Flocq for floats
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1939 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'common')
| -rw-r--r-- | common/Memory.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/common/Memory.v b/common/Memory.v index 49dcd7b..f9b322e 100644 --- a/common/Memory.v +++ b/common/Memory.v @@ -1970,7 +1970,7 @@ Proof. destruct (zlt ofs0 lo). eapply perm_drop_3; eauto. destruct (zle hi ofs0). eapply perm_drop_3; eauto. apply perm_implies with p. eapply perm_drop_1; eauto. omega. - generalize (size_chunk_pos chunk); intros. intuition. omegaContradiction. omegaContradiction. + generalize (size_chunk_pos chunk); intros. intuition. eapply perm_drop_3; eauto. Qed. |