| /freebsd-13.1/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) 161 #define fvalue(o) check_exp(ttislcf(o), val_(o).f) 162 #define hvalue(o) check_exp(ttistable(o), &val_(o).gc->h) 163 #define bvalue(o) check_exp(ttisboolean(o), val_(o).b) [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()
|
| /freebsd-13.1/contrib/lua/src/ |
| H A D | lstate.h | 331 check_exp(novariant((o)->tt) == LUA_TSTRING, &((cast_u(o))->ts)) 332 #define gco2u(o) check_exp((o)->tt == LUA_VUSERDATA, &((cast_u(o))->u)) 333 #define gco2lcl(o) check_exp((o)->tt == LUA_VLCL, &((cast_u(o))->cl.l)) 334 #define gco2ccl(o) check_exp((o)->tt == LUA_VCCL, &((cast_u(o))->cl.c)) 336 check_exp(novariant((o)->tt) == LUA_TFUNCTION, &((cast_u(o))->cl)) 337 #define gco2t(o) check_exp((o)->tt == LUA_VTABLE, &((cast_u(o))->h)) 338 #define gco2p(o) check_exp((o)->tt == LUA_VPROTO, &((cast_u(o))->p)) 339 #define gco2th(o) check_exp((o)->tt == LUA_VTHREAD, &((cast_u(o))->th)) 340 #define gco2upv(o) check_exp((o)->tt == LUA_VUPVAL, &((cast_u(o))->upv)) 347 #define obj2gco(v) check_exp((v)->tt >= LUA_TSTRING, &(cast_u(v)->gc))
|
| 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 | lobject.h | 244 #define thvalue(o) check_exp(ttisthread(o), gco2th(val_(o).gc)) 283 #define gcvalue(o) check_exp(iscollectable(o), val_(o).gc) 308 #define nvalue(o) check_exp(ttisnumber(o), \ 310 #define fltvalue(o) check_exp(ttisfloat(o), val_(o).n) 311 #define ivalue(o) check_exp(ttisinteger(o), val_(o).i) 347 #define tsvalue(o) check_exp(ttisstring(o), gco2ts(val_(o).gc)) 414 #define pvalue(o) check_exp(ttislightuserdata(o), val_(o).p) 580 #define clvalue(o) check_exp(ttisclosure(o), gco2cl(val_(o).gc)) 582 #define fvalue(o) check_exp(ttislcf(o), val_(o).f) 659 #define hvalue(o) check_exp(ttistable(o), gco2t(val_(o).gc)) [all …]
|
| 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 | 97 #define check_exp(c,e) (lua_assert(c), (e)) macro 102 #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))
|
| H A D | ltable.c | 260 #define limitasasize(t) check_exp(isrealasize(t), t->alimit)
|
| H A D | ldebug.c | 182 TString *s = check_exp(uv < p->sizeupvalues, p->upvalues[uv].name); in upvalname()
|