math: tgammal.c fixes

[oweals/musl.git] / src / math / scalbnl.c

diff --git a/src/math/scalbnl.c b/src/math/scalbnl.c
index a5d0adba437a5e0b04f47917204f4b0118a0bc4c..c605b8da3400a2e2a40d7e4f537974d2bb969f7f 100644 (file)
--- a/src/math/scalbnl.c
+++ b/src/math/scalbnl.c
@@ -29,7 +29,7 @@ long double scalbnl(long double x, int n)
                                return x * 0x1p-16382L;
                }
        }
-       scale.e = 1.0L;
+       scale.e = 1.0;
        scale.bits.exp = 0x3fff + n;
        return x * scale.e;
 }