diff options
| author | Yann Herklotz <git@yannherklotz.com> | 2021-09-17 16:52:29 +0100 |
|---|---|---|
| committer | Yann Herklotz <git@yannherklotz.com> | 2021-09-17 16:52:29 +0100 |
| commit | 4be142376801c205ffd701208fad8eedf2c08d90 (patch) | |
| tree | d2f4d54cc34319e380e349eddef61c2994202e8b /arm/SelectOpproof.v | |
| parent | 48a9dcbdc968bcf05b4eec17b8c7fd471fb80240 (diff) | |
| parent | c9fad7cd7bdc4e79fb06a1d39abfa0d5471623e5 (diff) | |
| download | compcert-4be142376801c205ffd701208fad8eedf2c08d90.tar.gz compcert-4be142376801c205ffd701208fad8eedf2c08d90.zip | |
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'arm/SelectOpproof.v')
| -rw-r--r-- | arm/SelectOpproof.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/arm/SelectOpproof.v b/arm/SelectOpproof.v index 70f8f191..bd9f01b1 100644 --- a/arm/SelectOpproof.v +++ b/arm/SelectOpproof.v @@ -754,7 +754,7 @@ Qed. Theorem eval_cast8unsigned: unary_constructor_sound cast8unsigned (Val.zero_ext 8). Proof. red; intros until x. unfold cast8unsigned. - rewrite Val.zero_ext_and. apply eval_andimm. omega. + rewrite Val.zero_ext_and. apply eval_andimm. lia. Qed. Theorem eval_cast16signed: unary_constructor_sound cast16signed (Val.sign_ext 16). @@ -767,7 +767,7 @@ Qed. Theorem eval_cast16unsigned: unary_constructor_sound cast16unsigned (Val.zero_ext 16). Proof. red; intros until x. unfold cast8unsigned. - rewrite Val.zero_ext_and. apply eval_andimm. omega. + rewrite Val.zero_ext_and. apply eval_andimm. lia. Qed. Theorem eval_singleoffloat: unary_constructor_sound singleoffloat Val.singleoffloat. |