Fix MSVC build warnings.

This commit is contained in:
Calvin Rose 2019-11-09 10:12:40 -06:00
parent 63e7ca4623
commit dca247f01d
1 changed files with 1 additions and 1 deletions

View File

@ -91,7 +91,7 @@ double janet_rng_double(JanetRNG *rng) {
uint32_t hi = janet_rng_u32(rng);
uint32_t lo = janet_rng_u32(rng);
uint64_t big = (uint64_t)(lo) | (((uint64_t) hi) << 32);
return ldexp((big >> (64 - 52)), -52);
return ldexp((double)(big >> (64 - 52)), -52);
}
static Janet cfun_rng_make(int32_t argc, Janet *argv) {