aboutsummaryrefslogtreecommitdiff
path: root/lmathlib.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2022-12-12 14:08:55 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2022-12-12 14:08:55 -0300
commitff106c028ca944ee5e95b005628e2669b87bcaf2 (patch)
tree656a0733e61d6a728de4e4ea1ecaea18f171c3eb /lmathlib.c
parentd738c8d18bcc5651109b3a46103d6aa983772e68 (diff)
parentfa2f294dd1269115bf9cf534dd38553e2f606801 (diff)
downloadlua-ff106c028ca944ee5e95b005628e2669b87bcaf2.tar.gz
lua-ff106c028ca944ee5e95b005628e2669b87bcaf2.tar.bz2
lua-ff106c028ca944ee5e95b005628e2669b87bcaf2.zip
Merge branch 'master' into nextversion
Diffstat (limited to 'lmathlib.c')
-rw-r--r--lmathlib.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/lmathlib.c b/lmathlib.c
index e0c61a16..d0b1e1e5 100644
--- a/lmathlib.c
+++ b/lmathlib.c
@@ -267,7 +267,7 @@ static int math_type (lua_State *L) {
267 267
268/* try to find an integer type with at least 64 bits */ 268/* try to find an integer type with at least 64 bits */
269 269
270#if (ULONG_MAX >> 31 >> 31) >= 3 270#if ((ULONG_MAX >> 31) >> 31) >= 3
271 271
272/* 'long' has at least 64 bits */ 272/* 'long' has at least 64 bits */
273#define Rand64 unsigned long 273#define Rand64 unsigned long
@@ -277,9 +277,9 @@ static int math_type (lua_State *L) {
277/* there is a 'long long' type (which must have at least 64 bits) */ 277/* there is a 'long long' type (which must have at least 64 bits) */
278#define Rand64 unsigned long long 278#define Rand64 unsigned long long
279 279
280#elif (LUA_MAXUNSIGNED >> 31 >> 31) >= 3 280#elif ((LUA_MAXUNSIGNED >> 31) >> 31) >= 3
281 281
282/* 'lua_Integer' has at least 64 bits */ 282/* 'lua_Unsigned' has at least 64 bits */
283#define Rand64 lua_Unsigned 283#define Rand64 lua_Unsigned
284 284
285#endif 285#endif
@@ -500,12 +500,12 @@ static lua_Number I2d (Rand64 x) {
500 500
501/* convert a 'Rand64' to a 'lua_Unsigned' */ 501/* convert a 'Rand64' to a 'lua_Unsigned' */
502static lua_Unsigned I2UInt (Rand64 x) { 502static lua_Unsigned I2UInt (Rand64 x) {
503 return ((lua_Unsigned)trim32(x.h) << 31 << 1) | (lua_Unsigned)trim32(x.l); 503 return (((lua_Unsigned)trim32(x.h) << 31) << 1) | (lua_Unsigned)trim32(x.l);
504} 504}
505 505
506/* convert a 'lua_Unsigned' to a 'Rand64' */ 506/* convert a 'lua_Unsigned' to a 'Rand64' */
507static Rand64 Int2I (lua_Unsigned n) { 507static Rand64 Int2I (lua_Unsigned n) {
508 return packI((lu_int32)(n >> 31 >> 1), (lu_int32)n); 508 return packI((lu_int32)((n >> 31) >> 1), (lu_int32)n);
509} 509}
510 510
511#endif /* } */ 511#endif /* } */