mirror of https://github.com/rusefi/lua.git
no more protected global variables
This commit is contained in:
parent
39fd5bb9b0
commit
a6ad644bf2
10
lbuiltin.c
10
lbuiltin.c
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
** $Id: lbuiltin.c,v 1.11 1997/11/27 15:59:44 roberto Exp roberto $
|
||||
** $Id: lbuiltin.c,v 1.12 1997/11/27 18:25:14 roberto Exp roberto $
|
||||
** Built-in functions
|
||||
** See Copyright Notice in lua.h
|
||||
*/
|
||||
|
@ -217,17 +217,10 @@ static void luaI_assert (void)
|
|||
}
|
||||
|
||||
|
||||
static void check_globalname (char *n)
|
||||
{
|
||||
if (n[0] == '.')
|
||||
luaL_verror("cannot change variable `%.50s' (starts with `.')", n);
|
||||
}
|
||||
|
||||
static void setglobal (void)
|
||||
{
|
||||
char *n = luaL_check_string(1);
|
||||
lua_Object value = luaL_nonnullarg(2);
|
||||
check_globalname(n);
|
||||
lua_pushobject(value);
|
||||
lua_setglobal(n);
|
||||
lua_pushobject(value); /* return given value */
|
||||
|
@ -237,7 +230,6 @@ static void rawsetglobal (void)
|
|||
{
|
||||
char *n = luaL_check_string(1);
|
||||
lua_Object value = luaL_nonnullarg(2);
|
||||
check_globalname(n);
|
||||
lua_pushobject(value);
|
||||
lua_rawsetglobal(n);
|
||||
lua_pushobject(value); /* return given value */
|
||||
|
|
Loading…
Reference in New Issue