diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-22 10:28:54 +0100 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-22 10:28:54 +0100 |
| commit | 88c46de03f37dd9edb78e68734a9976ab2ccc056 (patch) | |
| tree | 9e80c873fa73bb0641506086f98e76ce1f664dbb /powerpc/SelectOp.vp | |
| parent | 5281141d38a492eea3e080e087b91a314b0be020 (diff) | |
| download | compcert-kvx-88c46de03f37dd9edb78e68734a9976ab2ccc056.tar.gz compcert-kvx-88c46de03f37dd9edb78e68734a9976ab2ccc056.zip | |
seems like powerpc runs but the result segfaults
Diffstat (limited to 'powerpc/SelectOp.vp')
| -rw-r--r-- | powerpc/SelectOp.vp | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/powerpc/SelectOp.vp b/powerpc/SelectOp.vp index d2ca408a..478ce251 100644 --- a/powerpc/SelectOp.vp +++ b/powerpc/SelectOp.vp @@ -43,6 +43,7 @@ Require Import Integers. Require Import Floats. Require Import Op. Require Import CminorSel. +Require Import OpHelpers. Local Open Scope cminorsel_scope. @@ -552,3 +553,10 @@ Nondetfunction builtin_arg (e: expr) := | Eop Oadd (e1:::e2:::Enil) => BA_addptr (BA e1) (BA e2) | _ => 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). |