diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-19 21:31:20 +0100 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-19 21:31:20 +0100 |
commit | 9adb576998f3b2017db5c062b459449e1721579a (patch) | |
tree | fd70a6ce92921404c91b7f9f494e219da4ae3945 /mppa_k1c/SelectOp.vp | |
parent | ae571e2467e977f03044d750568f6528d8d64e43 (diff) | |
download | compcert-kvx-9adb576998f3b2017db5c062b459449e1721579a.tar.gz compcert-kvx-9adb576998f3b2017db5c062b459449e1721579a.zip |
mul immediate
Diffstat (limited to 'mppa_k1c/SelectOp.vp')
-rw-r--r-- | mppa_k1c/SelectOp.vp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mppa_k1c/SelectOp.vp b/mppa_k1c/SelectOp.vp index 22211167..d87c837e 100644 --- a/mppa_k1c/SelectOp.vp +++ b/mppa_k1c/SelectOp.vp @@ -173,7 +173,7 @@ Definition mulimm_base (n1: int) (e2: expr) := | i :: j :: nil => Elet e2 (add (shlimm (Eletvar 0) i) (shlimm (Eletvar 0) j)) | _ => - Eop Omul (Eop (Ointconst n1) Enil ::: e2 ::: Enil) + Eop (Omulimm n1) (e2 ::: Enil) end. Nondetfunction mulimm (n1: int) (e2: expr) := |