diff options
Diffstat (limited to 'backend/Unusedglobproof.v')
| -rw-r--r-- | backend/Unusedglobproof.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/backend/Unusedglobproof.v b/backend/Unusedglobproof.v index db03d0b3..446ffb7f 100644 --- a/backend/Unusedglobproof.v +++ b/backend/Unusedglobproof.v @@ -853,6 +853,10 @@ Proof. destruct IHeval_builtin_arg2 as (v2' & A2 & B2); eauto using in_or_app. exists (Val.longofwords v1' v2'); split; auto with barg. apply Val.longofwords_inject; auto. +- destruct IHeval_builtin_arg1 as (v1' & A1 & B1); eauto using in_or_app. + destruct IHeval_builtin_arg2 as (v2' & A2 & B2); eauto using in_or_app. + econstructor; split; eauto with barg. + destruct Archi.ptr64; auto using Val.add_inject, Val.addl_inject. Qed. Lemma eval_builtin_args_inject: |