lua

commit b840a7518df607d2a1024c33dc2cc2022054d40a
parent f54cdb33a565aacd41fe00a172a3062a4a33118b
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Tue,  2 Oct 2001 13:43:07 -0300

details

Diffstat:
M
lbaselib.c
 | 
8
++++----
M
liolib.c
 | 
4
++--
M
lparser.c
 | 
2
+-
M
lstate.h
 | 
4
++--

4 files changed, 9 insertions(+), 9 deletions(-)
diff --git a/lbaselib.c b/lbaselib.c
@@ -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 */
 }
 
diff --git a/liolib.c b/liolib.c
@@ -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;
diff --git a/lparser.c b/lparser.c
@@ -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;
     }
diff --git a/lstate.h b/lstate.h
@@ -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 */