64     events->flags |= cast_byte(1u<<event);  /* cache this fact */  in luaT_gettm()
103 void luaT_callTM (lua_State *L, const TValue *f, const TValue *p1,  in luaT_callTM()  argument
107   setobj2s(L, func + 1, p1);  /* 1st argument */  in luaT_callTM()
119 void luaT_callTMres (lua_State *L, const TValue *f, const TValue *p1,  in luaT_callTMres()  argument
124   setobj2s(L, func + 1, p1);  /* 1st argument */  in luaT_callTMres()
129     luaD_call(L, func, 1);  in luaT_callTMres()
131     luaD_callnoyield(L, func, 1);  in luaT_callTMres()
137 static int callbinTM (lua_State *L, const TValue *p1, const TValue *p2,  in callbinTM()  argument
139   const TValue *tm = luaT_gettmbyobj(L, p1, event);  /* try first operand */  in callbinTM()
143   luaT_callTMres(L, tm, p1, p2, res);  in callbinTM()
144   return 1;  in callbinTM()
148 void luaT_trybinTM (lua_State *L, const TValue *p1, const TValue *p2,  in luaT_trybinTM()  argument
150   if (l_unlikely(!callbinTM(L, p1, p2, res, event))) {  in luaT_trybinTM()
154         if (ttisnumber(p1) && ttisnumber(p2))  in luaT_trybinTM()
155           luaG_tointerror(L, p1, p2);  in luaT_trybinTM()
157           luaG_opinterror(L, p1, p2, "perform bitwise operation on");  in luaT_trybinTM()
161         luaG_opinterror(L, p1, p2, "perform arithmetic on");  in luaT_trybinTM()
169   if (l_unlikely(!callbinTM(L, s2v(top - 2), s2v(top - 1), top - 2,  in luaT_tryconcatTM()
171     luaG_concaterror(L, s2v(top - 2), s2v(top - 1));  in luaT_tryconcatTM()
175 void luaT_trybinassocTM (lua_State *L, const TValue *p1, const TValue *p2,  in luaT_trybinassocTM()  argument
178     luaT_trybinTM(L, p2, p1, res, event);  in luaT_trybinassocTM()
180     luaT_trybinTM(L, p1, p2, res, event);  in luaT_trybinassocTM()
184 void luaT_trybiniTM (lua_State *L, const TValue *p1, lua_Integer i2,  in luaT_trybiniTM()  argument
188   luaT_trybinassocTM(L, p1, &aux, flip, res, event);  in luaT_trybiniTM()
201 int luaT_callorderTM (lua_State *L, const TValue *p1, const TValue *p2,  in luaT_callorderTM()  argument
203   if (callbinTM(L, p1, p2, L->top.p, event))  /* try original event */  in luaT_callorderTM()
207       /* try '!(p2 < p1)' for '(p1 <= p2)' */  in luaT_callorderTM()
209       if (callbinTM(L, p2, p1, L->top.p, TM_LT)) {  in luaT_callorderTM()
216   luaG_ordererror(L, p1, p2);  /* no metamethod found */  in luaT_callorderTM()
221 int luaT_callorderiTM (lua_State *L, const TValue *p1, int v2,  in luaT_callorderiTM()  argument
230     p2 = p1; p1 = &aux;  /* correct them */  in luaT_callorderiTM()
234   return luaT_callorderTM(L, p1, p2, event);  in luaT_callorderiTM()
241   int actual = cast_int(L->top.p - ci->func.p) - 1;  /* number of arguments */  in luaT_adjustvarargs()
244   luaD_checkstack(L, p->maxstacksize + 1);  in luaT_adjustvarargs()
248   for (i = 1; i <= nfixparams; i++) {  in luaT_adjustvarargs()
252   ci->func.p += actual + 1;  in luaT_adjustvarargs()
253   ci->top.p += actual + 1;  in luaT_adjustvarargs()