diff options
Diffstat (limited to 'src/lj_func.c')
-rw-r--r-- | src/lj_func.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lj_func.c b/src/lj_func.c index 83dab3b1..b3564091 100644 --- a/src/lj_func.c +++ b/src/lj_func.c | |||
@@ -98,7 +98,7 @@ GCfunc *lj_func_newC(lua_State *L, MSize nelems, GCtab *env) | |||
98 | GCfunc *fn = cast(GCfunc *, lj_mem_newgco(L, sizeCfunc(nelems))); | 98 | GCfunc *fn = cast(GCfunc *, lj_mem_newgco(L, sizeCfunc(nelems))); |
99 | fn->c.gct = ~LJ_TFUNC; | 99 | fn->c.gct = ~LJ_TFUNC; |
100 | fn->c.ffid = FF_C; | 100 | fn->c.ffid = FF_C; |
101 | fn->c.nupvalues = cast_byte(nelems); | 101 | fn->c.nupvalues = (uint8_t)nelems; |
102 | /* NOBARRIER: The GCfunc is new (marked white). */ | 102 | /* NOBARRIER: The GCfunc is new (marked white). */ |
103 | setmref(fn->c.pc, &G(L)->bc_cfunc_ext); | 103 | setmref(fn->c.pc, &G(L)->bc_cfunc_ext); |
104 | setgcref(fn->c.env, obj2gco(env)); | 104 | setgcref(fn->c.env, obj2gco(env)); |
@@ -110,7 +110,7 @@ GCfunc *lj_func_newL(lua_State *L, GCproto *pt, GCtab *env) | |||
110 | GCfunc *fn = cast(GCfunc *, lj_mem_newgco(L, sizeLfunc((MSize)pt->sizeuv))); | 110 | GCfunc *fn = cast(GCfunc *, lj_mem_newgco(L, sizeLfunc((MSize)pt->sizeuv))); |
111 | fn->l.gct = ~LJ_TFUNC; | 111 | fn->l.gct = ~LJ_TFUNC; |
112 | fn->l.ffid = FF_LUA; | 112 | fn->l.ffid = FF_LUA; |
113 | fn->l.nupvalues = cast_byte(pt->sizeuv); | 113 | fn->l.nupvalues = (uint8_t)pt->sizeuv; |
114 | /* NOBARRIER: Really a setgcref. But the GCfunc is new (marked white). */ | 114 | /* NOBARRIER: Really a setgcref. But the GCfunc is new (marked white). */ |
115 | setmref(fn->l.pc, proto_bc(pt)); | 115 | setmref(fn->l.pc, proto_bc(pt)); |
116 | setgcref(fn->l.env, obj2gco(env)); | 116 | setgcref(fn->l.env, obj2gco(env)); |