mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-31 15:43:01 +00:00
Code Issues 1 Releases Wiki Activity

Fix MSVC build warnings.

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

2
src/core/math.c
View File

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