diff options
| author | Cyril SIX <cyril.six@kalray.eu> | 2019-04-01 12:20:11 +0200 |
|---|---|---|
| committer | Cyril SIX <cyril.six@kalray.eu> | 2019-04-01 12:20:11 +0200 |
| commit | 1036dcaa7a99870aa1859a9a1c683ad8f9b3b0d8 (patch) | |
| tree | 7f31dc8f814d72ded2c36ac9be29d549e6f80ee8 /mppa_k1c/SelectLong.vp | |
| parent | 3451ed469864c10b2fc5892d46dab08e57e68416 (diff) | |
| download | compcert-kvx-1036dcaa7a99870aa1859a9a1c683ad8f9b3b0d8.tar.gz compcert-kvx-1036dcaa7a99870aa1859a9a1c683ad8f9b3b0d8.zip | |
Using fixedd.rz in longofsingle instead of i64_dtos
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 0c3618d7..31112dca 100644 --- a/mppa_k1c/SelectLong.vp +++ b/mppa_k1c/SelectLong.vp @@ -364,10 +364,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. |