| /src/sys/contrib/openzfs/module/lua/ |
| H A D | lstate.h | 203 check_exp(novariant((o)->gch.tt) == LUA_TSTRING, &((o)->ts)) 205 #define rawgco2u(o) check_exp((o)->gch.tt == LUA_TUSERDATA, &((o)->u)) 207 #define gco2lcl(o) check_exp((o)->gch.tt == LUA_TLCL, &((o)->cl.l)) 208 #define gco2ccl(o) check_exp((o)->gch.tt == LUA_TCCL, &((o)->cl.c)) 210 check_exp(novariant((o)->gch.tt) == LUA_TFUNCTION, &((o)->cl)) 211 #define gco2t(o) check_exp((o)->gch.tt == LUA_TTABLE, &((o)->h)) 212 #define gco2p(o) check_exp((o)->gch.tt == LUA_TPROTO, &((o)->p)) 213 #define gco2uv(o) check_exp((o)->gch.tt == LUA_TUPVAL, &((o)->uv)) 214 #define gco2th(o) check_exp((o)->gch.tt == LUA_TTHREAD, &((o)->th))
|
| H A D | lobject.h | 151 #define nvalue(o) check_exp(ttisnumber(o), num_(o)) 152 #define gcvalue(o) check_exp(iscollectable(o), val_(o).gc) 153 #define pvalue(o) check_exp(ttislightuserdata(o), val_(o).p) 154 #define rawtsvalue(o) check_exp(ttisstring(o), &val_(o).gc->ts) 156 #define rawuvalue(o) check_exp(ttisuserdata(o), &val_(o).gc->u) 158 #define clvalue(o) check_exp(ttisclosure(o), &val_(o).gc->cl) 159 #define clLvalue(o) check_exp(ttisLclosure(o), &val_(o).gc->cl.l) 160 #define clCvalue(o) check_exp(ttisCclosure(o), &val_(o).gc->cl.c) 161 #define fvalue(o) check_exp(ttislcf(o), val_(o).f) 162 #define hvalue(o) check_exp(ttistable(o), &val_(o).gc->h) [all …]
|
| H A D | llimits.h | 59 #define check_exp(c,e) (lua_assert(c), (e)) macro 64 #define check_exp(c,e) (e) macro
|
| H A D | lstring.h | 35 #define eqshrstr(a,b) check_exp((a)->tsv.tt == LUA_TSHRSTR, (a) == (b))
|
| H A D | lgc.h | 70 check_exp(g->gcstate == GCSpropagate || !isgenerational(g), \
|
| H A D | lvm.c | 552 #define RB(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgR, base+GETARG_B(i)) 553 #define RC(i) check_exp(getCMode(GET_OPCODE(i)) == OpArgR, base+GETARG_C(i)) 554 #define RKB(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgK, \ 556 #define RKC(i) check_exp(getCMode(GET_OPCODE(i)) == OpArgK, \
|
| H A D | ldebug.c | 107 TString *s = check_exp(uv < p->sizeupvalues, p->upvalues[uv].name); in upvalname()
|
| H A D | lcode.c | 710 : check_exp(vkisinreg(t->k), VLOCAL); in luaK_indexed()
|
| /src/contrib/lua/src/ |
| H A D | lstate.h | 235 check_exp(((st) & 7) == (st), /* status must fit in three bits */ \ 374 check_exp(novariant((o)->tt) == LUA_TSTRING, &((cast_u(o))->ts)) 375 #define gco2u(o) check_exp((o)->tt == LUA_VUSERDATA, &((cast_u(o))->u)) 376 #define gco2lcl(o) check_exp((o)->tt == LUA_VLCL, &((cast_u(o))->cl.l)) 377 #define gco2ccl(o) check_exp((o)->tt == LUA_VCCL, &((cast_u(o))->cl.c)) 379 check_exp(novariant((o)->tt) == LUA_TFUNCTION, &((cast_u(o))->cl)) 380 #define gco2t(o) check_exp((o)->tt == LUA_VTABLE, &((cast_u(o))->h)) 381 #define gco2p(o) check_exp((o)->tt == LUA_VPROTO, &((cast_u(o))->p)) 382 #define gco2th(o) check_exp((o)->tt == LUA_VTHREAD, &((cast_u(o))->th)) 383 #define gco2upv(o) check_exp((o)->tt == LUA_VUPVAL, &((cast_u(o))->upv)) [all …]
|
| H A D | lobject.h | 266 #define thvalue(o) check_exp(ttisthread(o), gco2th(val_(o).gc)) 305 #define gcvalue(o) check_exp(iscollectable(o), val_(o).gc) 330 #define nvalue(o) check_exp(ttisnumber(o), \ 332 #define fltvalue(o) check_exp(ttisfloat(o), val_(o).n) 333 #define ivalue(o) check_exp(ttisinteger(o), val_(o).i) 369 #define tsvalue(o) check_exp(ttisstring(o), gco2ts(val_(o).gc)) 405 #define getlngstr(ts) check_exp((ts)->shrlen == 0xFF, (ts)->contents) 406 #define getshrstr(ts) check_exp((ts)->shrlen != 0xFF, (ts)->contents) 434 #define pvalue(o) check_exp(ttislightuserdata(o), val_(o).p) 435 #define uvalue(o) check_exp(ttisfulluserdata(o), gco2u(val_(o).gc)) [all …]
|
| H A D | lopcodes.h | 128 #define GETARG_B(i) check_exp(checkopm(i, iABC), getarg(i, POS_B, SIZE_B)) 132 #define GETARG_C(i) check_exp(checkopm(i, iABC), getarg(i, POS_C, SIZE_C)) 136 #define TESTARG_k(i) check_exp(checkopm(i, iABC), (cast_int(((i) & (1u << POS_k))))) 137 #define GETARG_k(i) check_exp(checkopm(i, iABC), getarg(i, POS_k, 1)) 140 #define GETARG_Bx(i) check_exp(checkopm(i, iABx), getarg(i, POS_Bx, SIZE_Bx)) 143 #define GETARG_Ax(i) check_exp(checkopm(i, iAx), getarg(i, POS_Ax, SIZE_Ax)) 147 check_exp(checkopm(i, iAsBx), getarg(i, POS_Bx, SIZE_Bx) - OFFSET_sBx) 151 check_exp(checkopm(i, isJ), getarg(i, POS_sJ, SIZE_sJ) - OFFSET_sJ)
|
| H A D | lgc.h | 100 check_exp(!iswhite(x), l_setbit((x)->marked, BLACKBIT)) 121 check_exp(getage(o) == (f), (o)->marked ^= ((f)^(t)))
|
| H A D | llimits.h | 110 #define check_exp(c,e) (lua_assert(c), (e)) macro 115 #define check_exp(c,e) (e) macro
|
| H A D | lctype.h | 72 check_exp(('A' <= (c) && (c) <= 'Z') || (c) == ((c) | ('A' ^ 'a')), \
|
| H A D | lstring.h | 41 #define eqshrstr(a,b) check_exp((a)->tt == LUA_VSHRSTR, (a) == (b))
|
| H A D | lfunc.h | 35 #define uplevel(up) check_exp(upisopen(up), cast(StkId, (up)->v.p))
|
| H A D | ltable.c | 290 #define limitasasize(t) check_exp(isrealasize(t), t->alimit)
|
| H A D | ldebug.c | 181 TString *s = check_exp(uv < p->sizeupvalues, p->upvalues[uv].name); in upvalname()
|