diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-09-10 07:49:49 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-09-10 07:49:49 +0000 |
commit | 637334181f54154f6c5598073c60f3f2c3ab5e87 (patch) | |
tree | 8789da87f5c26ecf09eda0d38ad44d58df60ad78 /ia32/Asmgenproof.v | |
parent | c9acadca7c8d5d29dd57b9acba99369067f93ae1 (diff) | |
download | compcert-637334181f54154f6c5598073c60f3f2c3ab5e87.tar.gz compcert-637334181f54154f6c5598073c60f3f2c3ab5e87.zip |
Improvements for int8 and int16 stores
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1507 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'ia32/Asmgenproof.v')
-rw-r--r-- | ia32/Asmgenproof.v | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ia32/Asmgenproof.v b/ia32/Asmgenproof.v index ddf27693..543028ff 100644 --- a/ia32/Asmgenproof.v +++ b/ia32/Asmgenproof.v @@ -376,7 +376,9 @@ Remark mk_smallstore_label: (forall r addr, is_label lbl (f r addr) = false) -> find_label lbl c = find_label lbl k. Proof. - unfold mk_smallstore; intros. destruct (low_ireg r); monadInv H; simpl; rewrite H0; auto. + unfold mk_smallstore; intros. destruct (low_ireg r). + monadInv H; simpl; rewrite H0; auto. + destruct (addressing_mentions addr ECX); monadInv H; simpl; rewrite H0; auto. Qed. Remark loadind_label: |