diff options
| author | Cyril SIX <cyril.six@kalray.eu> | 2019-03-19 15:50:22 +0100 |
|---|---|---|
| committer | Cyril SIX <cyril.six@kalray.eu> | 2019-03-19 15:50:22 +0100 |
| commit | f321f75979d18ab99f226b2c5d6bbb59bffb5cac (patch) | |
| tree | 54dfd0c7ce3a0569549120c786026b6b33431254 /mppa_k1c/Asmblockgenproof.v | |
| parent | b169a1c8b88feee186d96c107562aff847caf235 (diff) | |
| download | compcert-kvx-f321f75979d18ab99f226b2c5d6bbb59bffb5cac.tar.gz compcert-kvx-f321f75979d18ab99f226b2c5d6bbb59bffb5cac.zip | |
Pseudo instruction for 32 bits division, no code generation yet
Diffstat (limited to 'mppa_k1c/Asmblockgenproof.v')
| -rw-r--r-- | mppa_k1c/Asmblockgenproof.v | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/mppa_k1c/Asmblockgenproof.v b/mppa_k1c/Asmblockgenproof.v index ddc96f6c..ea4d1918 100644 --- a/mppa_k1c/Asmblockgenproof.v +++ b/mppa_k1c/Asmblockgenproof.v @@ -935,7 +935,8 @@ Proof. intros until tbb. intros Hnonil Hnobuiltin GENB. unfold gen_bblocks in GENB.
destruct (extract_ctl tex) eqn:ECTL.
- destruct c.
- + destruct i. assert False. eapply Hnobuiltin. eauto. destruct H.
+ + destruct i; try (inv GENB; simpl; auto; fail).
+ assert False. eapply Hnobuiltin. eauto. destruct H.
+ inv GENB. simpl. auto.
- inversion Hnonil.
+ destruct tbdy as [|bi tbdy]; try (contradict H; simpl; auto; fail). inv GENB. auto.
|