119 #define setnvalue(obj,x) \  argument
120   { TValue *i_o=(obj); i_o->value.n=(x); i_o->tt=LUA_TNUMBER; }
122 #define setpvalue(obj,x) \  argument
123   { TValue *i_o=(obj); i_o->value.p=(x); i_o->tt=LUA_TLIGHTUSERDATA; }
125 #define setbvalue(obj,x) \  argument
126   { TValue *i_o=(obj); i_o->value.b=(x); i_o->tt=LUA_TBOOLEAN; }
128 #define setsvalue(L,obj,x) \  argument
130     i_o->value.gc=cast(GCObject *, (x)); i_o->tt=LUA_TSTRING; \
133 #define setuvalue(L,obj,x) \  argument
135     i_o->value.gc=cast(GCObject *, (x)); i_o->tt=LUA_TUSERDATA; \
138 #define setthvalue(L,obj,x) \  argument
140     i_o->value.gc=cast(GCObject *, (x)); i_o->tt=LUA_TTHREAD; \
143 #define setclvalue(L,obj,x) \  argument
145     i_o->value.gc=cast(GCObject *, (x)); i_o->tt=LUA_TFUNCTION; \
148 #define sethvalue(L,obj,x) \  argument
150     i_o->value.gc=cast(GCObject *, (x)); i_o->tt=LUA_TTABLE; \
153 #define setptvalue(L,obj,x) \  argument
155     i_o->value.gc=cast(GCObject *, (x)); i_o->tt=LUA_TPROTO; \
359 #define twoto(x)	(1<<(x))  argument
367 #define ceillog2(x)	(luaO_log2((x)-1) + 1)  argument
369 LUAI_FUNC int luaO_log2 (unsigned int x);
370 LUAI_FUNC int luaO_int2fb (unsigned int x);
371 LUAI_FUNC int luaO_fb2int (int x);