175 #define righttt(obj)		(ttype(obj) == gcvalue(obj)->gch.tt)  argument
177 #define checkliveness(g,obj) \  argument
178 	lua_longassert(!iscollectable(obj) || \
179 			(righttt(obj) && !isdead(g,gcvalue(obj))))
185 #define setnvalue(obj,x) \  argument
186   { TValue *io=(obj); num_(io)=(x); settt_(io, LUA_TNUMBER); }
188 #define setnilvalue(obj) settt_(obj, LUA_TNIL)  argument
190 #define setfvalue(obj,x) \  argument
191   { TValue *io=(obj); val_(io).f=(x); settt_(io, LUA_TLCF); }
193 #define setpvalue(obj,x) \  argument
194   { TValue *io=(obj); val_(io).p=(x); settt_(io, LUA_TLIGHTUSERDATA); }
196 #define setbvalue(obj,x) \  argument
197   { TValue *io=(obj); val_(io).b=(x); settt_(io, LUA_TBOOLEAN); }
199 #define setgcovalue(L,obj,x) \  argument
200   { TValue *io=(obj); GCObject *i_g=(x); \
203 #define setsvalue(L,obj,x) \  argument
204   { TValue *io=(obj); \
209 #define setuvalue(L,obj,x) \  argument
210   { TValue *io=(obj); \
214 #define setthvalue(L,obj,x) \  argument
215   { TValue *io=(obj); \
219 #define setclLvalue(L,obj,x) \  argument
220   { TValue *io=(obj); \
224 #define setclCvalue(L,obj,x) \  argument
225   { TValue *io=(obj); \
229 #define sethvalue(L,obj,x) \  argument
230   { TValue *io=(obj); \
234 #define setdeadvalue(obj)	settt_(obj, LUA_TDEADKEY)  argument
347 #define setnvalue(obj,x) \  argument
348 	{ TValue *io_=(obj); num_(io_)=(x); lua_assert(ttisnumber(io_)); }