diff options
author | Léo Gourdin <leo.gourdin@univ-grenoble-alpes.fr> | 2021-03-30 12:48:51 +0200 |
---|---|---|
committer | Léo Gourdin <leo.gourdin@univ-grenoble-alpes.fr> | 2021-03-30 12:48:51 +0200 |
commit | df9aab806ae8d20393b56e4175e210ed6cff1ef1 (patch) | |
tree | 96adb17a591e6c9b72c5b856deeff369a3a7dbb9 /riscV/Asmgenproof.v | |
parent | 83b556a101b7ed490acf9e127c5b4b9db40e1019 (diff) | |
download | compcert-kvx-df9aab806ae8d20393b56e4175e210ed6cff1ef1.tar.gz compcert-kvx-df9aab806ae8d20393b56e4175e210ed6cff1ef1.zip |
a more general way to manage special registers before introducing SP
Diffstat (limited to 'riscV/Asmgenproof.v')
-rw-r--r-- | riscV/Asmgenproof.v | 56 |
1 files changed, 28 insertions, 28 deletions
diff --git a/riscV/Asmgenproof.v b/riscV/Asmgenproof.v index 9a458b77..101bfa9c 100644 --- a/riscV/Asmgenproof.v +++ b/riscV/Asmgenproof.v @@ -212,22 +212,22 @@ Proof. - destruct (transl_cond_single c0 X31 x x0) as [insn normal] eqn:F; inv EQ2. apply tail_nolabel_cons. eapply transl_cond_single_nolabel; eauto. destruct normal; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. -- destruct optR0 as [[]|]; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. Qed. Remark transl_cond_op_label: @@ -309,18 +309,18 @@ Opaque Int.eq. - destruct (Int.eq n Int.zero); try destruct (Int.eq n Int.one); TailNoLabel. - eapply transl_cond_op_label; eauto. - destruct opi; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. -- destruct optR0 as [[]|]; simpl; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. +- destruct optR as [[]|]; simpl in *; TailNoLabel. Qed. Remark indexed_memory_access_label: |