diff options
Diffstat (limited to 'common/Memory.v')
| -rw-r--r-- | common/Memory.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/common/Memory.v b/common/Memory.v index e243d475..1e94d865 100644 --- a/common/Memory.v +++ b/common/Memory.v @@ -646,11 +646,11 @@ Next Obligation. apply access_max. Qed. Next Obligation. - specialize (nextblock_noaccess m b0 ofs k H0). intros. + exploit (nextblock_noaccess m b0 ofs k). auto. intros NOACC. rewrite PMap.gsspec. destruct (peq b0 b). subst b0. destruct (zle lo ofs). destruct (zlt ofs hi). - assert (perm m b ofs k Freeable). apply perm_cur. apply H; auto. - unfold perm in H2. rewrite H1 in H2. contradiction. + assert (P: perm m b ofs k Freeable) by auto using perm_cur. + unfold perm in P. rewrite NOACC in P. contradiction. auto. auto. auto. Qed. Next Obligation. |