|
@@ -1,5 +1,5 @@
|
|
|
/*
|
|
|
-** $Id: ldo.c,v 2.141 2015/10/21 18:40:47 roberto Exp roberto $
|
|
|
+** $Id: ldo.c,v 2.142 2015/10/28 12:06:45 roberto Exp roberto $
|
|
|
** Stack and Call structure of Lua
|
|
|
** See Copyright Notice in lua.h
|
|
|
*/
|
|
@@ -315,8 +315,13 @@ static void tryfuncTM (lua_State *L, StkId func) {
|
|
|
luaC_checkGC(L), /* stack grow uses memory */ \
|
|
|
p = restorestack(L, t__)) /* 'pos' part: restore 'p' */
|
|
|
|
|
|
+
|
|
|
/*
|
|
|
-** returns true if function has been executed (C function)
|
|
|
+** Prepares a function call: checks the stack, creates a new CallInfo
|
|
|
+** entry, fills in the relevant information, calls hook if needed.
|
|
|
+** If function is a C function, does the call, too. (Otherwise, leave
|
|
|
+** the execution ('luaV_execute') to the caller, to allow stackless
|
|
|
+** calls.) Returns true iff function has been executed (C function).
|
|
|
*/
|
|
|
int luaD_precall (lua_State *L, StkId func, int nresults) {
|
|
|
lua_CFunction f;
|
|
@@ -381,6 +386,11 @@ int luaD_precall (lua_State *L, StkId func, int nresults) {
|
|
|
}
|
|
|
|
|
|
|
|
|
+/*
|
|
|
+** Finishes a function call: calls hook if necessary, removes CallInfo,
|
|
|
+** moves corrent number of results to proper place; returns 0 iff call
|
|
|
+** wanted multiple (variable number of) results.
|
|
|
+*/
|
|
|
int luaD_poscall (lua_State *L, StkId firstResult, int nres) {
|
|
|
StkId res;
|
|
|
int wanted, i;
|