aboutsummaryrefslogtreecommitdiff
path: root/lbuiltin.c
diff options
context:
space:
mode:
Diffstat (limited to 'lbuiltin.c')
-rw-r--r--lbuiltin.c18
1 files changed, 9 insertions, 9 deletions
diff --git a/lbuiltin.c b/lbuiltin.c
index 501b0051..6bcfad4b 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbuiltin.c,v 1.119 2000/08/09 19:16:57 roberto Exp roberto $ 2** $Id: lbuiltin.c,v 1.120 2000/08/14 19:10:14 roberto Exp roberto $
3** Built-in functions 3** Built-in functions
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -401,7 +401,7 @@ void luaB_getn (lua_State *L) {
401} 401}
402 402
403 403
404/* auxiliar function */ 404/* auxiliary function */
405static void t_move (lua_State *L, Hash *t, int from, int to) { 405static void t_move (lua_State *L, Hash *t, int from, int to) {
406 TObject *p = luaH_setint(L, t, to); /* may change following `get' */ 406 TObject *p = luaH_setint(L, t, to); /* may change following `get' */
407 *p = *luaH_getnum(t, from); 407 *p = *luaH_getnum(t, from);
@@ -613,16 +613,16 @@ static void deprecated_funcs (lua_State *L) {
613#else 613#else
614 614
615/* 615/*
616** gives an explicit error in any attempt to call an obsolet function 616** gives an explicit error in any attempt to call a deprecated function
617*/ 617*/
618static void obsolete_func (lua_State *L) { 618static void deprecated_func (lua_State *L) {
619 luaL_verror(L, "function `%.20s' is obsolete", luaL_check_string(L, 1)); 619 luaL_verror(L, "function `%.20s' is deprecated", luaL_check_string(L, 1));
620} 620}
621 621
622 622
623#define num_deprecated 6 623#define num_deprecated 6
624 624
625static const char *const obsolete_names [num_deprecated] = { 625static const char *const deprecated_names [num_deprecated] = {
626 "foreachvar", "nextvar", "rawgetglobal", 626 "foreachvar", "nextvar", "rawgetglobal",
627 "rawgettable", "rawsetglobal", "rawsettable" 627 "rawgettable", "rawsetglobal", "rawsettable"
628}; 628};
@@ -631,9 +631,9 @@ static const char *const obsolete_names [num_deprecated] = {
631static void deprecated_funcs (lua_State *L) { 631static void deprecated_funcs (lua_State *L) {
632 int i; 632 int i;
633 for (i=0; i<num_deprecated; i++) { 633 for (i=0; i<num_deprecated; i++) {
634 lua_pushstring(L, obsolete_names[i]); 634 lua_pushstring(L, deprecated_names[i]);
635 lua_pushcclosure(L, obsolete_func, 1); 635 lua_pushcclosure(L, deprecated_func, 1);
636 lua_setglobal(L, obsolete_names[i]); 636 lua_setglobal(L, deprecated_names[i]);
637 } 637 }
638} 638}
639 639