GitHub/lua
1
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2025-01-14 05:43:00 +08:00
Code Issues Projects Releases Wiki Activity

easier to define api_check' using assert'

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2002-09-20 14:01:24 -03:00
parent 98d0b79613
commit ce09af1e25
1 changed files with 12 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
lapi.c
View File

@ -1,10 +1,11 @@
/* /*
** $Id: lapi.c,v 1.211 2002/08/08 20:08:41 roberto Exp roberto $ ** $Id: lapi.c,v 1.212 2002/08/30 19:09:21 roberto Exp roberto $
** Lua API ** Lua API
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
#include <assert.h>
#include <string.h> #include <string.h>
#include "lua.h" #include "lua.h"
@ -32,12 +33,12 @@ const char lua_ident[] =
#ifndef api_check #ifndef api_check
#define api_check(L, o) ((void)1) #define api_check(L, o) /*{ assert(o); }*/
#endif #endif
#define api_checknelems(L, n) api_check(L, (n) <= (L->top - L->ci->base)) #define api_checknelems(L, n) api_check(L, (n) <= (L->top - L->ci->base))
#define api_incr_top(L) (api_check(L, L->top<L->ci->top), L->top++) #define api_incr_top(L) {api_check(L, L->top < L->ci->top); L->top++;}
@ -60,10 +61,14 @@ static TObject *negindex (lua_State *L, int index) {
} }
#define luaA_index(L, index) \ static TObject *luaA_index (lua_State *L, int index) {
( (index > 0) ? \ if (index > 0) {
(api_check(L, index <= L->top - L->ci->base), L->ci->base+index-1) : \ api_check(L, index <= L->top - L->ci->base);
negindex(L, index)) return L->ci->base + index - 1;
}
else
return negindex(L, index);
}
static TObject *luaA_indexAcceptable (lua_State *L, int index) { static TObject *luaA_indexAcceptable (lua_State *L, int index) {