1 /* 2 ** $Id: lapi.h,v 1.3 2015/02/02 14:03:05 lneto Exp $ 3 ** Auxiliary functions from Lua API 4 ** See Copyright Notice in lua.h 5 */ 6 7 #ifndef lapi_h 8 #define lapi_h 9 10 11 #include "llimits.h" 12 #include "lstate.h" 13 14 #define api_incr_top(L) {L->top++; api_check(L->top <= L->ci->top, \ 15 "stack overflow");} 16 17 #define adjustresults(L,nres) \ 18 { if ((nres) == LUA_MULTRET && L->ci->top < L->top) L->ci->top = L->top; } 19 20 #define api_checknelems(L,n) api_check((n) < (L->top - L->ci->func), \ 21 "not enough elements in the stack") 22 23 24 #endif 25