summaryrefslogtreecommitdiff
path: root/ldo.c
diff options
context:
space:
mode:
Diffstat (limited to 'ldo.c')
-rw-r--r--ldo.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/ldo.c b/ldo.c
index 3dcb5ba9..a96cc388 100644
--- a/ldo.c
+++ b/ldo.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ldo.c,v 2.12 2004/12/01 15:52:54 roberto Exp roberto $ 2** $Id: ldo.c,v 2.13 2004/12/03 20:35:33 roberto Exp roberto $
3** Stack and Call structure of Lua 3** Stack and Call structure of Lua
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -474,7 +474,7 @@ static void f_parser (lua_State *L, void *ud) {
474 luaC_checkGC(L); 474 luaC_checkGC(L);
475 tf = ((c == LUA_SIGNATURE[0]) ? luaU_undump : luaY_parser)(L, p->z, 475 tf = ((c == LUA_SIGNATURE[0]) ? luaU_undump : luaY_parser)(L, p->z,
476 &p->buff, p->name); 476 &p->buff, p->name);
477 cl = luaF_newLclosure(L, tf->nups, gt(L)); 477 cl = luaF_newLclosure(L, tf->nups, hvalue(gt(L)));
478 cl->l.p = tf; 478 cl->l.p = tf;
479 for (i = 0; i < tf->nups; i++) /* initialize eventual upvalues */ 479 for (i = 0; i < tf->nups; i++) /* initialize eventual upvalues */
480 cl->l.upvals[i] = luaF_newupval(L); 480 cl->l.upvals[i] = luaF_newupval(L);