aboutsummaryrefslogtreecommitdiff
path: root/lmathlib.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-11-07 09:31:58 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-11-07 09:31:58 -0200
commit17ca3b176321fb3a33f4542982e6ff3e82a3d864 (patch)
treeb63d73cb64ab46ed4a7e6542382116141c7eed54 /lmathlib.c
parent50b18f60cb31b361dff6af6cde8389352641d7c1 (diff)
downloadlua-17ca3b176321fb3a33f4542982e6ff3e82a3d864.tar.gz
lua-17ca3b176321fb3a33f4542982e6ff3e82a3d864.tar.bz2
lua-17ca3b176321fb3a33f4542982e6ff3e82a3d864.zip
cleaner test for overflow for range of 'math.random'
Diffstat (limited to 'lmathlib.c')
-rw-r--r--lmathlib.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/lmathlib.c b/lmathlib.c
index 212dc696..a643ef73 100644
--- a/lmathlib.c
+++ b/lmathlib.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lmathlib.c,v 1.111 2014/10/24 11:42:06 roberto Exp roberto $ 2** $Id: lmathlib.c,v 1.112 2014/11/02 19:19:04 roberto Exp roberto $
3** Standard mathematical library 3** Standard mathematical library
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -258,8 +258,8 @@ static int math_random (lua_State *L) {
258 } 258 }
259 /* random integer in the interval [low, up] */ 259 /* random integer in the interval [low, up] */
260 luaL_argcheck(L, low <= up, 1, "interval is empty"); 260 luaL_argcheck(L, low <= up, 1, "interval is empty");
261 luaL_argcheck(L, (lua_Unsigned)up - low <= (lua_Unsigned)LUA_MAXINTEGER, 261 luaL_argcheck(L, low >= 0 || up <= LUA_MAXINTEGER + low, 1,
262 1, "interval too large"); 262 "interval too large");
263 r *= (double)(up - low) + 1.0; 263 r *= (double)(up - low) + 1.0;
264 lua_pushinteger(L, (lua_Integer)r + low); 264 lua_pushinteger(L, (lua_Integer)r + low);
265 return 1; 265 return 1;