Lines Matching +defs:obj2 +defs:o
110 #define val_(o) ((o)->value_)
111 #define num_(o) (val_(o).n)
115 #define rttype(o) ((o)->tt_)
121 #define ttype(o) (rttype(o) & 0x3F)
124 #define ttypenv(o) (novariant(rttype(o)))
128 #define checktag(o,t) (rttype(o) == (t))
129 #define checktype(o,t) (ttypenv(o) == (t))
130 #define ttisnumber(o) checktag((o), LUA_TNUMBER)
131 #define ttisnil(o) checktag((o), LUA_TNIL)
132 #define ttisboolean(o) checktag((o), LUA_TBOOLEAN)
133 #define ttislightuserdata(o) checktag((o), LUA_TLIGHTUSERDATA)
134 #define ttisstring(o) checktype((o), LUA_TSTRING)
135 #define ttisshrstring(o) checktag((o), ctb(LUA_TSHRSTR))
136 #define ttislngstring(o) checktag((o), ctb(LUA_TLNGSTR))
137 #define ttistable(o) checktag((o), ctb(LUA_TTABLE))
138 #define ttisfunction(o) checktype(o, LUA_TFUNCTION)
139 #define ttisclosure(o) ((rttype(o) & 0x1F) == LUA_TFUNCTION)
140 #define ttisCclosure(o) checktag((o), ctb(LUA_TCCL))
141 #define ttisLclosure(o) checktag((o), ctb(LUA_TLCL))
142 #define ttislcf(o) checktag((o), LUA_TLCF)
143 #define ttisuserdata(o) checktag((o), ctb(LUA_TUSERDATA))
144 #define ttisthread(o) checktag((o), ctb(LUA_TTHREAD))
145 #define ttisdeadkey(o) checktag((o), LUA_TDEADKEY)
150 #define nvalue(o) check_exp(ttisnumber(o), num_(o))
151 #define gcvalue(o) check_exp(iscollectable(o), val_(o).gc)
152 #define pvalue(o) check_exp(ttislightuserdata(o), val_(o).p)
153 #define rawtsvalue(o) check_exp(ttisstring(o), &val_(o).gc->ts)
154 #define tsvalue(o) (&rawtsvalue(o)->tsv)
155 #define rawuvalue(o) check_exp(ttisuserdata(o), &val_(o).gc->u)
156 #define uvalue(o) (&rawuvalue(o)->uv)
157 #define clvalue(o) check_exp(ttisclosure(o), &val_(o).gc->cl)
158 #define clLvalue(o) check_exp(ttisLclosure(o), &val_(o).gc->cl.l)
159 #define clCvalue(o) check_exp(ttisCclosure(o), &val_(o).gc->cl.c)
160 #define fvalue(o) check_exp(ttislcf(o), val_(o).f)
161 #define hvalue(o) check_exp(ttistable(o), &val_(o).gc->h)
162 #define bvalue(o) check_exp(ttisboolean(o), val_(o).b)
163 #define thvalue(o) check_exp(ttisthread(o), &val_(o).gc->th)
165 #define deadvalue(o) check_exp(ttisdeadkey(o), cast(void *, val_(o).gc))
167 #define l_isfalse(o) (ttisnil(o) || (ttisboolean(o) && bvalue(o) == 0))
170 #define iscollectable(o) (rttype(o) & BIT_ISCOLLECTABLE)
182 #define settt_(o,t) ((o)->tt_=(t))
237 #define setobj(L,obj1,obj2) \
238 { const TValue *io2=(obj2); TValue *io1=(obj1); \
264 #define luai_checknum(L,o,c) { /* empty */ }
303 #define v_(o) ((o)->u.i.v__)
304 #define d_(o) ((o)->u.d__)
305 #define tt_(o) ((o)->u.i.tt__)
314 #define v_(o) ((o)->u.i.v__)
315 #define d_(o) ((o)->u.d__)
316 #define tt_(o) ((o)->u.i.tt__)
325 #define val_(o) v_(o)
327 #define num_(o) d_(o)
335 #define ttisnumber(o) ((tt_(o) & NNMASK) != NNMARK)
340 #define rttype(o) (ttisnumber(o) ? LUA_TNUMBER : tt_(o) & 0xff)
343 #define settt_(o,t) (tt_(o) = tag2tt(t))
350 #define setobj(L,obj1,obj2) \
351 { const TValue *o2_=(obj2); TValue *o1_=(obj1); \
362 #define checktag(o,t) (tt_(o) == tag2tt(t))
363 #define checktype(o,t) (ctb(tt_(o) | VARBITS) == ctb(tag2tt(t) | VARBITS))
371 #define luai_checknum(L,o,c) { if (!ttisnumber(o)) c; }
425 #define svalue(o) getstr(rawtsvalue(o))
536 #define isLfunction(o) ttisLclosure(o)
538 #define getproto(o) (clLvalue(o)->p)