lua

A copy of the Lua development repository
Log | Files | Refs | README

commit e2b6b7de1b51ac662ad76423e045d0cf3274f051
parent 563b1f570400828dafa76bfae4a3b0b1eb9721a7
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Fri, 27 Oct 2000 09:39:30 -0200

details

Diffstat:
Mldebug.c | 4++--
Mlparser.c | 8++++----
2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/ldebug.c b/ldebug.c @@ -1,5 +1,5 @@ /* -** $Id: ldebug.c,v 1.47 2000/10/09 13:47:32 roberto Exp roberto $ +** $Id: ldebug.c,v 1.48 2000/10/20 16:39:03 roberto Exp roberto $ ** Debug Interface ** See Copyright Notice in lua.h */ @@ -169,7 +169,7 @@ LUA_API const char *lua_setlocal (lua_State *L, const lua_Debug *ar, L->top--; /* pop new value */ if (!fp) return NULL; /* `f' is not a Lua function? */ name = luaF_getlocalname(fp, localnum, currentpc(f)); - if (!name || name[0] == '*') return NULL; /* `*' starts private locals */ + if (!name || name[0] == '(') return NULL; /* `(' starts private locals */ *((f+1)+(localnum-1)) = *L->top; return name; } diff --git a/lparser.c b/lparser.c @@ -1,5 +1,5 @@ /* -** $Id: lparser.c,v 1.114 2000/09/29 12:42:13 roberto Exp roberto $ +** $Id: lparser.c,v 1.115 2000/10/10 19:51:15 roberto Exp roberto $ ** LL(1) Parser and code generator for Lua ** See Copyright Notice in lua.h */ @@ -859,8 +859,8 @@ static void fornum (LexState *ls, TString *varname) { else luaK_code1(fs, OP_PUSHINT, 1); /* default step */ new_localvar(ls, varname, 0); - new_localvarstr(ls, "*limit*", 1); - new_localvarstr(ls, "*step*", 2); + new_localvarstr(ls, "(limit)", 1); + new_localvarstr(ls, "(step)", 2); forbody(ls, 3, OP_FORPREP, OP_FORLOOP); } @@ -876,7 +876,7 @@ static void forlist (LexState *ls, TString *indexname) { "`in' expected"); next(ls); /* skip `in' */ exp1(ls); /* table */ - new_localvarstr(ls, "*table*", 0); + new_localvarstr(ls, "(table)", 0); new_localvar(ls, indexname, 1); new_localvar(ls, valname, 2); forbody(ls, 3, OP_LFORPREP, OP_LFORLOOP);