nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

'math.random' uses lua_Number to manage its arguments (there is no

Browse Source 
reason to lose range).
This commit is contained in:
Roberto Ierusalimschy
2009-03-17 14:55:39 -03:00
parent 9e613b8583
commit 3ca739b418
1 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lmathlib.c
View File

@@ -1,5 +1,5 @@
/*
** $Id: lmathlib.c,v 1.71 2009/02/18 13:06:05 roberto Exp roberto $
** $Id: lmathlib.c,v 1.72 2009/02/18 13:17:10 roberto Exp roberto $
** Standard mathematical library
** See Copyright Notice in lua.h
*/
@@ -201,14 +201,14 @@ static int math_random (lua_State *L) {
break;
}
case 1: { /* only upper limit */
int u = luaL_checkint(L, 1);
luaL_argcheck(L, 1<=u, 1, "interval is empty");
lua_pushnumber(L, floor(r*u)+1); /* int between 1 and `u' */
lua_Number u = luaL_checknumber(L, 1);
luaL_argcheck(L, 1.0 <= u, 1, "interval is empty");
lua_pushnumber(L, floor(r*u) + 1.0); /* int between 1 and `u' */
break;
}
case 2: { /* lower and upper limits */
int l = luaL_checkint(L, 1);
int u = luaL_checkint(L, 2);
lua_Number l = luaL_checknumber(L, 1);
lua_Number u = luaL_checknumber(L, 2);
luaL_argcheck(L, l <= u, 2, "interval is empty");
lua_pushnumber(L, floor(r*(u-l+1)) + l); /* int between `l' and `u' */
break;