diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-09 16:28:05 +0200 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-09 16:28:05 +0200 |
| commit | 47ecb1ec8d00636d6e7bb4cebd21df5d0b9b5ac7 (patch) | |
| tree | b4cee1012000686f604c0fd7f00a562562e5c8ce /powerpc | |
| parent | f2e6e7ff8aedb94b42da53ddc6bcd1c9ada38b80 (diff) | |
| parent | d11616ef3d2561e9cdbc819a7b8b101875fdea09 (diff) | |
| download | compcert-kvx-47ecb1ec8d00636d6e7bb4cebd21df5d0b9b5ac7.tar.gz compcert-kvx-47ecb1ec8d00636d6e7bb4cebd21df5d0b9b5ac7.zip | |
Merge remote-tracking branch 'origin/mppa-expect3' into mppa-work
Diffstat (limited to 'powerpc')
| -rw-r--r-- | powerpc/SelectOp.vp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/powerpc/SelectOp.vp b/powerpc/SelectOp.vp index 50b1bdd6..52f4f855 100644 --- a/powerpc/SelectOp.vp +++ b/powerpc/SelectOp.vp @@ -472,7 +472,7 @@ Definition intuoffloat (e: expr) := else Elet e (Elet (Eop (Ofloatconst (Float.of_intu Float.ox8000_0000)) Enil) - (Econdition (CEcond (Ccompf Clt) (Eletvar 1 ::: Eletvar 0 ::: Enil)) + (Econdition (CEcond (Ccompf Clt) None (Eletvar 1 ::: Eletvar 0 ::: Enil)) (intoffloat (Eletvar 1)) (addimm Float.ox8000_0000 (intoffloat (subf (Eletvar 1) (Eletvar 0))))))%nat. |