aboutsummaryrefslogtreecommitdiffstats
path: root/kvx/SelectLong.vp
diff options
context:
space:
mode:
authorDavid Monniaux <David.Monniaux@univ-grenoble-alpes.fr>2022-02-11 22:46:42 +0100
committerDavid Monniaux <David.Monniaux@univ-grenoble-alpes.fr>2022-02-11 22:46:42 +0100
commitf2a2cca20b8ae576c603b4f119cb2a7c73515f18 (patch)
tree7af4a1a9416bb83adea370f1dc969148bb178199 /kvx/SelectLong.vp
parent8675997219a5883ca639429639b2ab0edff16aa2 (diff)
downloadcompcert-kvx-f2a2cca20b8ae576c603b4f119cb2a7c73515f18.tar.gz
compcert-kvx-f2a2cca20b8ae576c603b4f119cb2a7c73515f18.zip
remove useless stuff
Diffstat (limited to 'kvx/SelectLong.vp')
-rw-r--r--kvx/SelectLong.vp4
1 files changed, 0 insertions, 4 deletions
diff --git a/kvx/SelectLong.vp b/kvx/SelectLong.vp
index b3638eca..16517aa5 100644
--- a/kvx/SelectLong.vp
+++ b/kvx/SelectLong.vp
@@ -433,19 +433,15 @@ Definition cmpl (c: comparison) (e1 e2: expr) :=
(** ** Floating-point conversions *)
Definition longoffloat (e: expr) :=
- if Archi.splitlong then SplitLong.longoffloat e else
Eop Olongoffloat (e:::Enil).
Definition longuoffloat (e: expr) :=
- if Archi.splitlong then SplitLong.longuoffloat e else
Eop Olonguoffloat (e:::Enil).
Definition floatoflong (e: expr) :=
- if Archi.splitlong then SplitLong.floatoflong e else
Eop Ofloatoflong (e:::Enil).
Definition floatoflongu (e: expr) :=
- if Archi.splitlong then SplitLong.floatoflongu e else
Eop Ofloatoflongu (e:::Enil).
Definition longofsingle (e: expr) := longoffloat (floatofsingle e).