summaryrefslogtreecommitdiff
path: root/cfrontend/Cexec.v
diff options
context:
space:
mode:
Diffstat (limited to 'cfrontend/Cexec.v')
-rw-r--r--cfrontend/Cexec.v3
1 files changed, 1 insertions, 2 deletions
diff --git a/cfrontend/Cexec.v b/cfrontend/Cexec.v
index f83c700..03cab54 100644
--- a/cfrontend/Cexec.v
+++ b/cfrontend/Cexec.v
@@ -295,8 +295,7 @@ Remark check_assign_copy:
{ assign_copy_ok ty b ofs b' ofs' } + {~ assign_copy_ok ty b ofs b' ofs' }.
Proof with try (right; intuition omega).
intros. unfold assign_copy_ok.
- assert (alignof_blockcopy ty > 0).
- { unfold alignof_blockcopy. apply Z.min_case. omega. apply alignof_pos. }
+ assert (alignof_blockcopy ty > 0) by apply alignof_blockcopy_pos.
destruct (Zdivide_dec (alignof_blockcopy ty) (Int.unsigned ofs')); auto...
destruct (Zdivide_dec (alignof_blockcopy ty) (Int.unsigned ofs)); auto...
assert (Y: {b' <> b \/