diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2021-02-01 18:58:16 +0100 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2021-02-01 18:58:16 +0100 |
commit | 10dbecd69cb985841a85b8b62efdf29c3242967f (patch) | |
tree | 4191d240db3cb0e0944796a8d65707bed0c0ef3a | |
parent | 21aaf9c53b2bb0c6d376c2ce436d6dd7f5442a47 (diff) | |
download | compcert-kvx-10dbecd69cb985841a85b8b62efdf29c3242967f.tar.gz compcert-kvx-10dbecd69cb985841a85b8b62efdf29c3242967f.zip |
Asmgen for bits / float
-rw-r--r-- | riscV/Asmgen.v | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/riscV/Asmgen.v b/riscV/Asmgen.v index b431d63d..debe1928 100644 --- a/riscV/Asmgen.v +++ b/riscV/Asmgen.v @@ -705,6 +705,19 @@ Definition transl_op do rd <- freg_of res; do rs <- ireg_of a1; OK (Pfcvtslu rd rs :: k) + | Obits_of_single, a1 :: nil => + do rd <- ireg_of res; do rs <- freg_of a1; + OK (Pfmvxs rd rs :: k) + | Obits_of_float, a1 :: nil => + do rd <- ireg_of res; do rs <- freg_of a1; + OK (Pfmvxd rd rs :: k) + | Osingle_of_bits, a1 :: nil => + do rd <- freg_of res; do rs <- ireg_of a1; + OK (Pfmvsx rd rs :: k) + | Ofloat_of_bits, a1 :: nil => + do rd <- freg_of res; do rs <- ireg_of a1; + OK (Pfmvdx rd rs :: k) + | Ocmp cmp, _ => do rd <- ireg_of res; transl_cond_op cmp rd args k |