X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Fscalbnf.c;h=a5ad208b69929f24336fae40e6af37101c99a72f;hb=a75283d777ed1827ed247dbb465818a0ce371c8f;hp=f94b5d5992bb0ad8ed67e19323e68853201df045;hpb=c4359e01303da2755fe7e8033826b132eb3659b1;p=musl diff --git a/src/math/scalbnf.c b/src/math/scalbnf.c index f94b5d59..a5ad208b 100644 --- a/src/math/scalbnf.c +++ b/src/math/scalbnf.c @@ -1,33 +1,31 @@ -#include "libm.h" +#include +#include float scalbnf(float x, int n) { - float scale; + union {float f; uint32_t i;} u; + float_t y = x; if (n > 127) { - x *= 0x1p127f; + y *= 0x1p127f; n -= 127; if (n > 127) { - x *= 0x1p127f; + y *= 0x1p127f; n -= 127; - if (n > 127) { - STRICT_ASSIGN(float, x, x * 0x1p127f); - return x; - } + if (n > 127) + n = 127; } } else if (n < -126) { - x *= 0x1p-126f; - n += 126; + y *= 0x1p-126f * 0x1p24f; + n += 126 - 24; if (n < -126) { - x *= 0x1p-126f; - n += 126; - if (n < -126) { - STRICT_ASSIGN(float, x, x * 0x1p-126f); - return x; - } + y *= 0x1p-126f * 0x1p24f; + n += 126 - 24; + if (n < -126) + n = -126; } } - SET_FLOAT_WORD(scale, (uint32_t)(0x7f+n)<<23); - STRICT_ASSIGN(float, x, x * scale); + u.i = (uint32_t)(0x7f+n)<<23; + x = y * u.f; return x; }