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/ValueAOp.v | |
| parent | fb02f9116621a0bcb9bb2c334ad782fee5887d0e (diff) | |
| download | compcert-kvx-4e3b46ca2a30abf520672f4b1a28f91f171f6e7e.tar.gz compcert-kvx-4e3b46ca2a30abf520672f4b1a28f91f171f6e7e.zip | |
nor implemente
Diffstat (limited to 'mppa_k1c/ValueAOp.v')
| -rw-r--r-- | mppa_k1c/ValueAOp.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/mppa_k1c/ValueAOp.v b/mppa_k1c/ValueAOp.v index a78857b3..b9319a82 100644 --- a/mppa_k1c/ValueAOp.v +++ b/mppa_k1c/ValueAOp.v @@ -69,6 +69,8 @@ Definition eval_static_operation (op: operation) (vl: list aval): aval := | Onandimm n, v1::nil => notint (and v1 (I n)) | Oor, v1::v2::nil => or v1 v2 | Oorimm n, v1::nil => or v1 (I n) + | Onor, v1::v2::nil => notint (or v1 v2) + | Onorimm n, v1::nil => notint (or v1 (I n)) | Oxor, v1::v2::nil => xor v1 v2 | Oxorimm n, v1::nil => xor v1 (I n) | Oshl, v1::v2::nil => shl v1 v2 |