This commit is contained in:
Roberto Ierusalimschy 2001-10-02 13:43:29 -03:00
parent f54cdb33a5
commit b840a7518d
4 changed files with 9 additions and 9 deletions

View File

@ -1,5 +1,5 @@
/*
** $Id: lbaselib.c,v 1.39 2001/07/12 18:11:58 roberto Exp $
** $Id: lbaselib.c,v 1.41 2001/08/31 19:46:07 roberto Exp $
** Basic library
** See Copyright Notice in lua.h
*/
@ -234,7 +234,7 @@ static int luaB_settagmethod (lua_State *L) {
luaL_arg_check(L, lua_isfunction(L, 3) || lua_isnil(L, 3), 3,
l_s("function or nil expected"));
if (strcmp(event, l_s("gc")) == 0)
lua_error(L, l_s("deprecated use: cannot set the `gc' tag method from Lua"));
lua_error(L, l_s("cannot set `gc' tag method from Lua"));
lua_gettagmethod(L, tag, event);
lua_pushvalue(L, 3);
lua_settagmethod(L, tag, event);
@ -246,7 +246,7 @@ static int luaB_gettagmethod (lua_State *L) {
int tag = gettag(L, 1);
const l_char *event = luaL_check_string(L, 2);
if (strcmp(event, l_s("gc")) == 0)
lua_error(L, l_s("deprecated use: cannot get the `gc' tag method from Lua"));
lua_error(L, l_s("cannot get `gc' tag method from Lua"));
lua_gettagmethod(L, tag, event);
return 1;
}
@ -451,7 +451,7 @@ static int luaB_call (lua_State *L) {
return 1;
}
if (strchr(options, l_c('p'))) /* pack results? */
lua_error(L, l_s("deprecated option `p' in `call'"));
lua_error(L, l_s("obsolete option `p' in `call'"));
return lua_gettop(L) - oldtop; /* results are already on the stack */
}

View File

@ -1,5 +1,5 @@
/*
** $Id: liolib.c,v 1.121 2001/07/22 00:59:36 roberto Exp $
** $Id: liolib.c,v 1.122 2001/08/31 19:46:07 roberto Exp $
** Standard I/O (and system) library
** See Copyright Notice in lua.h
*/
@ -322,7 +322,7 @@ static int io_read (lua_State *L) {
success = 1; /* always success */
break;
case l_c('w'): /* word */
lua_error(L, l_s("option `*w' is deprecated"));
lua_error(L, l_s("obsolete option `*w'"));
break;
case l_c('u'): { /* read until */
size_t pl = lua_strlen(L, n) - 2;

View File

@ -627,7 +627,7 @@ static void prefixexp (LexState *ls, expdesc *v) {
case l_c('%'): { /* for compatibility only */
next(ls); /* skip `%' */
singlevar(ls->fs, str_checkname(ls), v, 1);
check_condition(ls, v->k == VUPVAL, l_s("global upvalues are deprecated"));
check_condition(ls, v->k == VUPVAL, l_s("global upvalues are obsolete"));
next(ls);
return;
}

View File

@ -1,5 +1,5 @@
/*
** $Id: lstate.h,v 1.58 2001/06/15 19:16:41 roberto Exp $
** $Id: lstate.h,v 1.59 2001/09/07 17:39:10 roberto Exp $
** Global State
** See Copyright Notice in lua.h
*/
@ -66,7 +66,7 @@ typedef struct global_State {
lu_mem GCthreshold;
lu_mem nblocks; /* number of `bytes' currently allocated */
Proto *rootproto; /* list of all prototypes */
Closure *rootcl; /* list of all closed closures */
Closure *rootcl; /* list of all C closures and closed Lua closures */
Hash *roottable; /* list of all tables */
Udata *rootudata; /* list of all userdata */
UpVal *rootupval; /* list of all up values */