diff options
-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 */ |