aboutsummaryrefslogtreecommitdiffstats
path: root/riscV/SelectOp.vp
diff options
context:
space:
mode:
authorDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2019-03-22 10:16:16 +0100
committerDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2019-03-22 10:16:16 +0100
commit4d53251d4e9a07da1170f4be9b04b5d44381c9ed (patch)
tree6f4ee5c6e54b6c6fcc60311f90bff806d236af97 /riscV/SelectOp.vp
parent5281141d38a492eea3e080e087b91a314b0be020 (diff)
downloadcompcert-kvx-4d53251d4e9a07da1170f4be9b04b5d44381c9ed.tar.gz
compcert-kvx-4d53251d4e9a07da1170f4be9b04b5d44381c9ed.zip
Risc-V works again (32/64).
Diffstat (limited to 'riscV/SelectOp.vp')
-rw-r--r--riscV/SelectOp.vp7
1 files changed, 7 insertions, 0 deletions
diff --git a/riscV/SelectOp.vp b/riscV/SelectOp.vp
index bb8af2ed..181b9d05 100644
--- a/riscV/SelectOp.vp
+++ b/riscV/SelectOp.vp
@@ -448,3 +448,10 @@ Nondetfunction builtin_arg (e: expr) :=
if Archi.ptr64 then BA_addptr (BA e1) (BA_long n) else BA e
| _ => BA e
end.
+
+(* floats *)
+Definition divf_base (e1: expr) (e2: expr) :=
+ Eop Odivf (e1 ::: e2 ::: Enil).
+
+Definition divfs_base (e1: expr) (e2: expr) :=
+ Eop Odivfs (e1 ::: e2 ::: Enil).