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) | |
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 ddf2769..543028f 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: |