diff options
Diffstat (limited to '')
| -rw-r--r-- | lbaselib.c | 8 | ||||
| -rw-r--r-- | liolib.c | 4 | ||||
| -rw-r--r-- | lparser.c | 2 | ||||
| -rw-r--r-- | lstate.h | 4 |
4 files changed, 9 insertions, 9 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lbaselib.c,v 1.39 2001/07/12 18:11:58 roberto Exp $ | 2 | ** $Id: lbaselib.c,v 1.41 2001/08/31 19:46:07 roberto Exp $ |
| 3 | ** Basic library | 3 | ** Basic library |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -234,7 +234,7 @@ static int luaB_settagmethod (lua_State *L) { | |||
| 234 | luaL_arg_check(L, lua_isfunction(L, 3) || lua_isnil(L, 3), 3, | 234 | luaL_arg_check(L, lua_isfunction(L, 3) || lua_isnil(L, 3), 3, |
| 235 | l_s("function or nil expected")); | 235 | l_s("function or nil expected")); |
| 236 | if (strcmp(event, l_s("gc")) == 0) | 236 | if (strcmp(event, l_s("gc")) == 0) |
| 237 | lua_error(L, l_s("deprecated use: cannot set the `gc' tag method from Lua")); | 237 | lua_error(L, l_s("cannot set `gc' tag method from Lua")); |
| 238 | lua_gettagmethod(L, tag, event); | 238 | lua_gettagmethod(L, tag, event); |
| 239 | lua_pushvalue(L, 3); | 239 | lua_pushvalue(L, 3); |
| 240 | lua_settagmethod(L, tag, event); | 240 | lua_settagmethod(L, tag, event); |
| @@ -246,7 +246,7 @@ static int luaB_gettagmethod (lua_State *L) { | |||
| 246 | int tag = gettag(L, 1); | 246 | int tag = gettag(L, 1); |
| 247 | const l_char *event = luaL_check_string(L, 2); | 247 | const l_char *event = luaL_check_string(L, 2); |
| 248 | if (strcmp(event, l_s("gc")) == 0) | 248 | if (strcmp(event, l_s("gc")) == 0) |
| 249 | lua_error(L, l_s("deprecated use: cannot get the `gc' tag method from Lua")); | 249 | lua_error(L, l_s("cannot get `gc' tag method from Lua")); |
| 250 | lua_gettagmethod(L, tag, event); | 250 | lua_gettagmethod(L, tag, event); |
| 251 | return 1; | 251 | return 1; |
| 252 | } | 252 | } |
| @@ -451,7 +451,7 @@ static int luaB_call (lua_State *L) { | |||
| 451 | return 1; | 451 | return 1; |
| 452 | } | 452 | } |
| 453 | if (strchr(options, l_c('p'))) /* pack results? */ | 453 | if (strchr(options, l_c('p'))) /* pack results? */ |
| 454 | lua_error(L, l_s("deprecated option `p' in `call'")); | 454 | lua_error(L, l_s("obsolete option `p' in `call'")); |
| 455 | return lua_gettop(L) - oldtop; /* results are already on the stack */ | 455 | return lua_gettop(L) - oldtop; /* results are already on the stack */ |
| 456 | } | 456 | } |
| 457 | 457 | ||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: liolib.c,v 1.121 2001/07/22 00:59:36 roberto Exp $ | 2 | ** $Id: liolib.c,v 1.122 2001/08/31 19:46:07 roberto Exp $ |
| 3 | ** Standard I/O (and system) library | 3 | ** Standard I/O (and system) library |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -322,7 +322,7 @@ static int io_read (lua_State *L) { | |||
| 322 | success = 1; /* always success */ | 322 | success = 1; /* always success */ |
| 323 | break; | 323 | break; |
| 324 | case l_c('w'): /* word */ | 324 | case l_c('w'): /* word */ |
| 325 | lua_error(L, l_s("option `*w' is deprecated")); | 325 | lua_error(L, l_s("obsolete option `*w'")); |
| 326 | break; | 326 | break; |
| 327 | case l_c('u'): { /* read until */ | 327 | case l_c('u'): { /* read until */ |
| 328 | size_t pl = lua_strlen(L, n) - 2; | 328 | size_t pl = lua_strlen(L, n) - 2; |
| @@ -627,7 +627,7 @@ static void prefixexp (LexState *ls, expdesc *v) { | |||
| 627 | case l_c('%'): { /* for compatibility only */ | 627 | case l_c('%'): { /* for compatibility only */ |
| 628 | next(ls); /* skip `%' */ | 628 | next(ls); /* skip `%' */ |
| 629 | singlevar(ls->fs, str_checkname(ls), v, 1); | 629 | singlevar(ls->fs, str_checkname(ls), v, 1); |
| 630 | check_condition(ls, v->k == VUPVAL, l_s("global upvalues are deprecated")); | 630 | check_condition(ls, v->k == VUPVAL, l_s("global upvalues are obsolete")); |
| 631 | next(ls); | 631 | next(ls); |
| 632 | return; | 632 | return; |
| 633 | } | 633 | } |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lstate.h,v 1.58 2001/06/15 19:16:41 roberto Exp $ | 2 | ** $Id: lstate.h,v 1.59 2001/09/07 17:39:10 roberto Exp $ |
| 3 | ** Global State | 3 | ** Global State |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -66,7 +66,7 @@ typedef struct global_State { | |||
| 66 | lu_mem GCthreshold; | 66 | lu_mem GCthreshold; |
| 67 | lu_mem nblocks; /* number of `bytes' currently allocated */ | 67 | lu_mem nblocks; /* number of `bytes' currently allocated */ |
| 68 | Proto *rootproto; /* list of all prototypes */ | 68 | Proto *rootproto; /* list of all prototypes */ |
| 69 | Closure *rootcl; /* list of all closed closures */ | 69 | Closure *rootcl; /* list of all C closures and closed Lua closures */ |
| 70 | Hash *roottable; /* list of all tables */ | 70 | Hash *roottable; /* list of all tables */ |
| 71 | Udata *rootudata; /* list of all userdata */ | 71 | Udata *rootudata; /* list of all userdata */ |
| 72 | UpVal *rootupval; /* list of all up values */ | 72 | UpVal *rootupval; /* list of all up values */ |
