aboutsummaryrefslogtreecommitdiffstats
path: root/kvx/SelectLong.vp
diff options
context:
space:
mode:
Diffstat (limited to 'kvx/SelectLong.vp')
-rw-r--r--kvx/SelectLong.vp5
1 files changed, 4 insertions, 1 deletions
diff --git a/kvx/SelectLong.vp b/kvx/SelectLong.vp
index 3598025a..9df3212b 100644
--- a/kvx/SelectLong.vp
+++ b/kvx/SelectLong.vp
@@ -452,7 +452,10 @@ Definition longuofsingle (e: expr) := longuoffloat (floatofsingle e).
Definition use_inlined_fp_conversions := true.
Opaque use_inlined_fp_conversions.
-Definition singleoflong (e: expr) := SplitLong.singleoflong e.
+Definition singleoflong (e: expr) :=
+ if use_inlined_fp_conversions
+ then FPExtra.e_single_of_long e
+ else SplitLong.singleoflong e.
Definition singleoflongu (e: expr) :=
if use_inlined_fp_conversions