rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

type 'Rand64' may not be long long, so it should not use 'LL' in its 

constants
This commit is contained in:
Roberto Ierusalimschy 2018-06-14 15:47:22 -03:00
parent 992b6d2712
commit aedcfb9414
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lmathlib.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lmathlib.c,v 1.133 2018/05/09 14:54:37 roberto Exp roberto $
** $Id: lmathlib.c,v 1.134 2018/05/16 11:27:59 roberto Exp roberto $
** Standard mathematical library
** See Copyright Notice in lua.h
*/
@ -279,7 +279,7 @@ static int math_type (lua_State *L) {
#elif (LUA_MAXINTEGER >> 31 >> 31) >= 1
/* 'lua_Integer' has at least 64 bits */
#define Rand64 LUA_UNSIGNED
#define Rand64 lua_Unsigned
#endif
@ -325,8 +325,9 @@ static Rand64 nextrand (Rand64 *state) {
** Convert bits from a random integer into a float in the
** interval [0,1).
*/
#define maskFIG (~(~1LLU << (FIGS - 1))) /* use FIGS bits */
#define shiftFIG (l_mathop(0.5) / (1LLU << (FIGS - 1))) /* 2^(-FIGS) */
#define maskFIG (~(~(Rand64)1 << (FIGS - 1))) /* use FIGS bits */
#define shiftFIG \
(l_mathop(0.5) / ((Rand64)1 << (FIGS - 1))) /* 2^(-FIGS) */
static lua_Number I2d (Rand64 x) {
return (lua_Number)(x & maskFIG) * shiftFIG;