diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-19 20:41:23 +0100 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-19 20:41:23 +0100 |
commit | ae571e2467e977f03044d750568f6528d8d64e43 (patch) | |
tree | 8e9d2a1f19662c18fa2f8df8a0d8c77d91158e5d /mppa_k1c/NeedOp.v | |
parent | f2e7e95f6e113edbcb80618a0f3b4c15caa6f5cd (diff) | |
download | compcert-kvx-ae571e2467e977f03044d750568f6528d8d64e43.tar.gz compcert-kvx-ae571e2467e977f03044d750568f6528d8d64e43.zip |
mul immediate begin
Diffstat (limited to 'mppa_k1c/NeedOp.v')
-rw-r--r-- | mppa_k1c/NeedOp.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/mppa_k1c/NeedOp.v b/mppa_k1c/NeedOp.v index 801a520e..c7b59a34 100644 --- a/mppa_k1c/NeedOp.v +++ b/mppa_k1c/NeedOp.v @@ -45,6 +45,7 @@ Definition needs_of_operation (op: operation) (nv: nval): list nval := | Oneg => op1 (modarith nv) | Osub => op2 (default nv) | Omul => op2 (modarith nv) + | Omulimm _ => op1 (modarith nv) | Omulhs | Omulhu | Odiv | Odivu | Omod | Omodu => op2 (default nv) | Oand => op2 (bitwise nv) | Oandimm n => op1 (andimm nv n) @@ -171,6 +172,7 @@ Proof. - apply add_sound; auto with na. - apply neg_sound; auto. - apply mul_sound; auto. +- apply mul_sound; auto with na. - apply and_sound; auto. - apply andimm_sound; auto. - apply notint_sound; apply and_sound; auto. |