diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-03 18:23:11 +0200 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-03 18:23:11 +0200 |
commit | 616f939e3ac7ff052f0eb7bce8c16873730ddf0e (patch) | |
tree | f6b304eaa992b8f9f2d12ee44337dc0e0028efb9 /mppa_k1c/SelectLong.vp | |
parent | 629252b160fd4b909231bcad6edcf6f254aca0d6 (diff) | |
parent | f4b802ecd426fe594009817fde6df2dde8e08df2 (diff) | |
download | compcert-kvx-616f939e3ac7ff052f0eb7bce8c16873730ddf0e.tar.gz compcert-kvx-616f939e3ac7ff052f0eb7bce8c16873730ddf0e.zip |
Merge remote-tracking branch 'origin/mppa-work' into mppa-ternary
Diffstat (limited to 'mppa_k1c/SelectLong.vp')
-rw-r--r-- | mppa_k1c/SelectLong.vp | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/mppa_k1c/SelectLong.vp b/mppa_k1c/SelectLong.vp index 6c34de19..60b8f094 100644 --- a/mppa_k1c/SelectLong.vp +++ b/mppa_k1c/SelectLong.vp @@ -384,10 +384,9 @@ Definition floatoflongu (e: expr) := if Archi.splitlong then SplitLong.floatoflongu e else Eop Ofloatoflongu (e:::Enil). -(* SplitLong.longofsingle splits the operation into (longoffloat (floatofsingle e)) *) -Definition longofsingle (e: expr) := SplitLong.longofsingle e. +Definition longofsingle (e: expr) := longoffloat (floatofsingle e). -Definition longuofsingle (e: expr) := SplitLong.longuofsingle e. +Definition longuofsingle (e: expr) := longuoffloat (floatofsingle e). Definition singleoflong (e: expr) := SplitLong.singleoflong e. |