commit 8e36e1fe4928c60a09573a850e6807d922a56664
parent 97505caa64aa82aab635f7135aaba8b5ef857e52
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Tue, 27 Mar 2007 09:36:37 -0300
details (randomseed calls rand once to dischard first value)
Diffstat:
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lmathlib.c b/lmathlib.c
@@ -1,5 +1,5 @@
/*
-** $Id: lmathlib.c,v 1.67 2005/08/26 17:36:32 roberto Exp roberto $
+** $Id: lmathlib.c,v 1.68 2006/08/07 19:01:56 roberto Exp roberto $
** Standard mathematical library
** See Copyright Notice in lua.h
*/
@@ -211,6 +211,7 @@ static int math_random (lua_State *L) {
static int math_randomseed (lua_State *L) {
srand(luaL_checkint(L, 1));
+ (void)rand(); /* discard first value to avoid undesirable correlations */
return 0;
}