aboutsummaryrefslogtreecommitdiff
path: root/lfunc.c
diff options
context:
space:
mode:
Diffstat (limited to 'lfunc.c')
-rw-r--r--lfunc.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/lfunc.c b/lfunc.c
index 1e61f03f..0ef73284 100644
--- a/lfunc.c
+++ b/lfunc.c
@@ -24,20 +24,20 @@
24 24
25 25
26 26
27CClosure *luaF_newCclosure (lua_State *L, int n) { 27CClosure *luaF_newCclosure (lua_State *L, int nupvals) {
28 GCObject *o = luaC_newobj(L, LUA_TCCL, sizeCclosure(n)); 28 GCObject *o = luaC_newobj(L, LUA_TCCL, sizeCclosure(nupvals));
29 CClosure *c = gco2ccl(o); 29 CClosure *c = gco2ccl(o);
30 c->nupvalues = cast_byte(n); 30 c->nupvalues = cast_byte(nupvals);
31 return c; 31 return c;
32} 32}
33 33
34 34
35LClosure *luaF_newLclosure (lua_State *L, int n) { 35LClosure *luaF_newLclosure (lua_State *L, int nupvals) {
36 GCObject *o = luaC_newobj(L, LUA_TLCL, sizeLclosure(n)); 36 GCObject *o = luaC_newobj(L, LUA_TLCL, sizeLclosure(nupvals));
37 LClosure *c = gco2lcl(o); 37 LClosure *c = gco2lcl(o);
38 c->p = NULL; 38 c->p = NULL;
39 c->nupvalues = cast_byte(n); 39 c->nupvalues = cast_byte(nupvals);
40 while (n--) c->upvals[n] = NULL; 40 while (nupvals--) c->upvals[nupvals] = NULL;
41 return c; 41 return c;
42} 42}
43 43