Fix modulo for edge cases.
Fix modulo for edge cases.

Reference code:
```
for i,lhs in ipairs({-math.huge, -10.0, 0.0, 10.0, math.huge}) do
for j,rhs in ipairs({-math.huge, -10.0, 0.0, 10.0, math.huge}) do
print(lhs, rhs, lhs % rhs)
end
end
```
MightyPirates/OC-LuaJ,MightyPirates/OC-LuaJ