diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-16 18:24:03 +0100 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-16 18:24:03 +0100 |
commit | 4e3b46ca2a30abf520672f4b1a28f91f171f6e7e (patch) | |
tree | 044fd5393f5fa563cfc85e7e60a00621d18044da /mppa_k1c/NeedOp.v | |
parent | fb02f9116621a0bcb9bb2c334ad782fee5887d0e (diff) | |
download | compcert-kvx-4e3b46ca2a30abf520672f4b1a28f91f171f6e7e.tar.gz compcert-kvx-4e3b46ca2a30abf520672f4b1a28f91f171f6e7e.zip |
nor implemente
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 c5d9e58f..3442e3c1 100644 --- a/mppa_k1c/NeedOp.v +++ b/mppa_k1c/NeedOp.v @@ -51,6 +51,8 @@ Definition needs_of_operation (op: operation) (nv: nval): list nval := | Onandimm n => op1 (andimm nv n) | Oor => op2 (bitwise nv) | Oorimm n => op1 (orimm nv n) + | Onor => op2 (bitwise nv) + | Onorimm n => op1 (orimm nv n) | Oxor => op2 (bitwise nv) | Oxorimm n => op1 (bitwise nv) | Oshl | Oshr | Oshru => op2 (default nv) @@ -154,6 +156,8 @@ Proof. - apply notint_sound; apply andimm_sound; auto. - apply or_sound; auto. - apply orimm_sound; auto. +- apply notint_sound; apply or_sound; auto. +- apply notint_sound; apply orimm_sound; auto. - apply xor_sound; auto. - apply xor_sound; auto with na. - apply shlimm_sound; auto. |