diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-16 16:16:42 +0100 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-16 16:16:42 +0100 |
commit | 0d66eae95a8905ff985cd4738808fc93215a4904 (patch) | |
tree | fb3fc30d85ed470e8d6d5a925e3a23016c6e3061 /mppa_k1c/NeedOp.v | |
parent | 1b1577c372c71a11831feb043e3b050deb60ba99 (diff) | |
download | compcert-kvx-0d66eae95a8905ff985cd4738808fc93215a4904.tar.gz compcert-kvx-0d66eae95a8905ff985cd4738808fc93215a4904.zip |
nand debut
Diffstat (limited to 'mppa_k1c/NeedOp.v')
-rw-r--r-- | mppa_k1c/NeedOp.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/mppa_k1c/NeedOp.v b/mppa_k1c/NeedOp.v index 5f8648d3..c5d9e58f 100644 --- a/mppa_k1c/NeedOp.v +++ b/mppa_k1c/NeedOp.v @@ -47,6 +47,8 @@ Definition needs_of_operation (op: operation) (nv: nval): list nval := | Omulhs | Omulhu | Odiv | Odivu | Omod | Omodu => op2 (default nv) | Oand => op2 (bitwise nv) | Oandimm n => op1 (andimm nv n) + | Onand => op2 (bitwise nv) + | Onandimm n => op1 (andimm nv n) | Oor => op2 (bitwise nv) | Oorimm n => op1 (orimm nv n) | Oxor => op2 (bitwise nv) @@ -148,6 +150,8 @@ Proof. - apply mul_sound; auto. - apply and_sound; auto. - apply andimm_sound; auto. +- apply notint_sound; apply and_sound; auto. +- apply notint_sound; apply andimm_sound; auto. - apply or_sound; auto. - apply orimm_sound; auto. - apply xor_sound; auto. |