Function luaD_call

Source/Misc/lua/src/lua.c:5515–5526

** Call a function (C or Lua). The function to be called is at *func. ** The arguments are on the stack, right after the function. ** When returns, all the results are on the stack, starting at the original ** function position. */

** function position.
*/
void luaD_call (lua_State *L, StkId func, int nResults) {
if (++L->nCcalls >= LUAI_MAXCCALLS) {
if (L->nCcalls == LUAI_MAXCCALLS)
luaG_runerror(L, "C stack overflow");
else if (L->nCcalls >= (LUAI_MAXCCALLS + (LUAI_MAXCCALLS>>3)))
luaD_throw(L, LUA_ERRERR);  /* error while handing stack error */
}
if (luaD_precall(L, func, nResults) == PCRLUA)  /* is a Lua function? */
luaV_execute(L, 1);  /* call it */
L->nCcalls--;
luaC_checkGC(L);
}


static void resume (lua_State *L, void *ud) {