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/ValueAOp.v | |
| parent | f2e7e95f6e113edbcb80618a0f3b4c15caa6f5cd (diff) | |
| download | compcert-kvx-ae571e2467e977f03044d750568f6528d8d64e43.tar.gz compcert-kvx-ae571e2467e977f03044d750568f6528d8d64e43.zip | |
mul immediate begin
Diffstat (limited to 'mppa_k1c/ValueAOp.v')
| -rw-r--r-- | mppa_k1c/ValueAOp.v | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/mppa_k1c/ValueAOp.v b/mppa_k1c/ValueAOp.v index a92358ca..3bb25807 100644 --- a/mppa_k1c/ValueAOp.v +++ b/mppa_k1c/ValueAOp.v @@ -57,6 +57,7 @@ Definition eval_static_operation (op: operation) (vl: list aval): aval := | Oneg, v1::nil => neg v1 | Osub, v1::v2::nil => sub v1 v2 | Omul, v1::v2::nil => mul v1 v2 + | Omulimm n, v1::nil => mul v1 (I n) | Omulhs, v1::v2::nil => mulhs v1 v2 | Omulhu, v1::v2::nil => mulhu v1 v2 | Odiv, v1::v2::nil => divs v1 v2 |