diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-05-21 16:26:30 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-05-21 16:26:30 +0000 |
| commit | 0053b1aa1d26da5d1f995a603b127daf799c2da9 (patch) | |
| tree | fec49ad37e5edffa5be742bafcadff3c8b8ede7f /ia32/ConstpropOpproof.v | |
| parent | 219a2d178dcd5cc625f6b6261759f392cfca367b (diff) | |
Merge of the newmem branch:
- Revised memory model with Max and Cur permissions, but without bounds
- Constant propagation of 'const' globals
- Function inlining at RTL level
- (Unprovable) elimination of unreferenced static definitions
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1899 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'ia32/ConstpropOpproof.v')
| -rw-r--r-- | ia32/ConstpropOpproof.v | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ia32/ConstpropOpproof.v b/ia32/ConstpropOpproof.v index 04a1725..1612bf6 100644 --- a/ia32/ConstpropOpproof.v +++ b/ia32/ConstpropOpproof.v @@ -141,7 +141,7 @@ Proof. unfold eval_static_operation. case (eval_static_operation_match op al); intros; InvVLMA; simpl in *; FuncInv; try subst v; auto. - + destruct (propagate_float_constants tt); simpl; auto. rewrite Int.sub_add_opp. rewrite shift_symbol_address. rewrite Val.sub_add_opp. auto. destruct (Int.eq n2 Int.zero); inv H0; simpl; auto. destruct (Int.eq n2 Int.zero); inv H0; simpl; auto. @@ -159,6 +159,7 @@ Proof. unfold eval_static_intoffloat. destruct (Float.intoffloat n1) as []_eqn; simpl in H0; inv H0. simpl; auto. + destruct (propagate_float_constants tt); simpl; auto. unfold eval_static_condition_val. destruct (eval_static_condition c vl0) as [b|]_eqn. rewrite (eval_static_condition_correct _ _ _ m _ H Heqo). destruct b; simpl; auto. |