Fix math.fround

This commit is contained in:
Lars Mueller 2021-03-30 18:06:58 +02:00
parent f5dd65d772
commit 859d617138

@ -61,12 +61,11 @@ function fround(number)
number = -number
end
local exp = math.floor(math.log(number, 2))
local powexp = 2 ^ math.max(-126, math.min(number, 127))
local powexp = 2 ^ math.max(-126, math.min(exp, 127))
local leading = exp < -127 and 0 or 1
local mantissa = math.floor((leading - number / powexp) * 0x800000 + 0.5)
if mantissa <= -0x800000 then
return sign * math.huge
end
mantissa = mantissa / 0x800000
return sign * powexp * (leading - mantissa), mantissa
return sign * powexp * (leading - mantissa / 0x800000)
end