dist/src/lapi.c

70     api_check(L, idx <= ci->top.p - (ci->func.p + 1), "unacceptable index");
75     api_check(L, idx != 0 && -idx <= L->top.p - (ci->func.p + 1),
83     api_check(L, idx <= MAXUPVAL + 1, "upvalue index too large");
90       api_check(L, ttislcf(s2v(ci->func.p)), "caller not a C function");
105     api_check(L, o < L->top.p, "invalid index");
109     api_check(L, idx != 0 && -idx <= L->top.p - (ci->func.p + 1),
111     api_check(L, !ispseudo(idx), "invalid index");
122   api_check(L, n >= 0, "negative 'n'");
139   api_check(from, G(from) == G(to), "moving among independent states");
140   api_check(from, to->ci->top.p - to->top.p >= n, "stack overflow");
144     to->top.p++;  /* stack already checked by previous 'api_check' */
195     api_check(L, idx <= ci->top.p - (func + 1), "new top too large");
201     api_check(L, -(idx+1) <= (L->top.p - (func + 1)), "invalid new top");
204   api_check(L, L->tbclist.p < L->top.p, "previous pop of an unclosed slot");
219   api_check(L, hastocloseCfunc(L->ci->nresults) && L->tbclist.p == level,
252   api_check(L, (n >= 0 ? n : -n) <= (t - p + 1), "invalid 'n'");
266   api_check(L, isvalid(L, to), "invalid index");
298   api_check(L, LUA_TNONE <= t && t < LUA_NUMTYPES, "invalid type");
369       default: api_check(L, 0, "invalid option");
598     api_check(L, n <= MAXUPVAL, "upvalue index too large");
737   api_check(L, ttistable(t), "table expected");
817   api_check(L, ttisfulluserdata(o), "full userdata expected");
952     api_check(L, ttistable(s2v(L->top.p - 1)), "table expected");
989   api_check(L, ttisfulluserdata(o), "full userdata expected");
1009      api_check(L, (nr) == LUA_MULTRET \
1018   api_check(L, k == NULL || !isLua(L->ci),
1021   api_check(L, L->status == LUA_OK, "cannot do calls on non-normal thread");
1059   api_check(L, k == NULL || !isLua(L->ci),
1062   api_check(L, L->status == LUA_OK, "cannot do calls on non-normal thread");
1068     api_check(L, ttisfunction(s2v(o)), "error handler must be a function");
1286   api_check(L, L->tbclist.p < o, "given index below or equal a marked one");
1356   api_check(L, 0 <= nuvalue && nuvalue < USHRT_MAX, "invalid value");
1431   api_check(L, ttisLclosure(fi), "Lua function expected");
1456       api_check(L, 0, "function expected");
1468   api_check(L, *up1 != NULL && *up2 != NULL, "invalid upvalue index");