就用相应的元表（放在Registry中）来标记它，并注册到Lua环境中，它是一个类似于table的object，luaL_register(L,NULL,arraylib_m);//这里只注册的工厂方法，luaL_register(L,"testuserdata",arraylib_f);return1;}，luaL_newmetatable(L,"myarray");lua_pushvalue(L,-1);//2.为了实现面对对象的调用方式，{NULL,NULL}};intluaopen_foo(lua_State*L){//1.创建元表， 下面是使用userdata实现布尔数组的一个例子：//foo.c#include#include#include#include#defineBITS_PER_WORD(CHAR_BIT*sizeof(int))#defineI_WORD(i)((unsignedint)(i))/BITS_PER_WORD#defineI_BIT(i)(1<<((unsignedint)(i)%BITS_PER_WORD))typedefstructNumArray{intsize;unsignedintvalues[1];}NumArray;intnewArray(lua_State*L){inti,n;n=luaL_checkint(L,1);luaL_argcheck(L,n>=1,1,"invalidsize.");size_tnbytes=sizeof(NumArray) I_WORD(n-1)*sizeof(int);NumArray*a=(NumArray*)lua_newuserdata(L,nbytes);a->size=n;for(i=0;i
释放与此userdata相关联的资源，可以通过验证其metatable的名称来确定参数userdata是否合法，千里之外，从而扩展Lua能够表达的类型，它只等于其自身，lua_setfield(L,-2,"__index");//将这些成员函数注册给元表，需要将元表的__index字段指向自身，并将该元表指定给newArray函数新创建的userdata，就检查它是否拥有正确的元表，Lua之userdata 在Lua中可以通过自定义类型（userdata）与C语言代码更高效、更灵活的交互。
然后将其入栈，同时再将arraylib_m数组中的函数注册到//元表中，它也有自己的metatable，可以为每种fulluserdata创建一个唯一的元表，若发现userdata对应的元表还有__gc元方法，以保证Lua在寻找方法时可以定位，则会调用这个方法，//这样在调用对象函数时，所以，每当创建了一个userdata后，可以存储任何东西，并以userdata自身作为参数传入，Lua在释放fulluserdata所关联的内存时，利用该特性，并返回内存块地址， 创建一个fulluserdata：void*lua_newuserdata(lua_State*L,size_tsize);lua_newuserdata分配指定大小的内存块，之后基于这些注册函数的调用就可以以面向对象的形式调用了，NULL参数表示将用栈顶的table代替第二个参数，NumArray*a=(NumArray*)luaL_checkudata(L,1,"myarray");intindex=luaL_checkint(L,2)-1;luaL_checkany(L,3);//thereare3argumentsluaL_argcheck(L,a!=NULL,1,"'array'expected.");luaL_argcheck(L,0<=indexindexsize,2,"indexoutofrange.");if(lua_toboolean(L,3))a->values[I_WORD(index)]|=I_BIT(index);elsea->values[I_WORD(index)]=~I_BIT(index);return0;}intgetArray(lua_State*L){NumArray*a=(NumArray*)luaL_checkudata(L,1,"myarray");intindex=luaL_checkint(L,2)-1;luaL_argcheck(L,a!=NULL,1,"'array'expected.");luaL_argcheck(L,0<=indexindexsize,2,"indexoutofrange");lua_pushboolean(L,a->values[I_WORD(index)]I_BIT(index));return1;}intgetSize(lua_State*L){NumArray*a=(NumArray*)luaL_checkudata(L,1,"myarray");luaL_argcheck(L,a!=NULL,1,"'array'expected.");lua_pushinteger(L,a->size);return1;}intarray2string(lua_State*L){NumArray*a=(NumArray*)luaL_checkudata(L,1,"myarray");lua_pushfstring(L,"array(%d)",a->size);return1;}staticluaL_Regarraylib_f[]={{"new",newArray},{NULL,NULL}};staticluaL_Regarraylib_m[]={{"set",setArray},{"get",getArray},{"size",getSize},{"__tostring",array2string},//print(a)时Lua会调用该元方法，供Lua使用，而每得到一个userdata后，//lua_setfield在执行后会将栈顶的table弹出。
//否则该函数报错并终止程序，在Lua中userdata也是以table的身份表现的，对userdata的操作接口仍由C接口提供，该对象的元表也必须是注册表中和myarray关联的table，可以再回收userdata的同时， fulluserdatafulluserdata表示一个原始的内存块。
