diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-25 11:17:19 +0200 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-25 11:17:19 +0200 |
| commit | 5809fa295f23952a2d8b043f6da69d61da3568de (patch) | |
| tree | 1e8890f40a837786d824d1a8cd401c16aee93832 /mppa_k1c/Asmvliw.v | |
| parent | bb185aa85ddf32feed61d7888c1b199fffdd821f (diff) | |
| download | compcert-kvx-5809fa295f23952a2d8b043f6da69d61da3568de.tar.gz compcert-kvx-5809fa295f23952a2d8b043f6da69d61da3568de.zip | |
progress
Diffstat (limited to 'mppa_k1c/Asmvliw.v')
| -rw-r--r-- | mppa_k1c/Asmvliw.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/mppa_k1c/Asmvliw.v b/mppa_k1c/Asmvliw.v index b39ebd0e..13ff5422 100644 --- a/mppa_k1c/Asmvliw.v +++ b/mppa_k1c/Asmvliw.v @@ -308,6 +308,7 @@ Inductive arith_name_rr : Type := | Pzxwd (**r Zero Extend Word to Double Word *) (* | Pextfs (stop : int) (start : int) (**r extract bit field, signed *) *) | Pextfz (stop : Z) (start : Z) (**r extract bit field, unsigned *) + | Pextfs (stop : Z) (start : Z) (**r extract bit field, signed *) | Pfabsd (**r float absolute double *) | Pfabsw (**r float absolute word *) @@ -881,6 +882,7 @@ Definition arith_eval_rr n v := | Psxwd => Val.longofint v | Pzxwd => Val.longofintu v | Pextfz stop start => Val.extfz stop start v + | Pextfs stop start => Val.extfs stop start v | Pfnegd => Val.negf v | Pfnegw => Val.negfs v | Pfabsd => Val.absf v |