1 

     2 #include <lua.h>

     3 

     4 #include "glib_types.h"

     5 #include "glib_main_context.h"

     6 #include "glib_timeout.h"

     7 #include "glib_source.h"

     8 

     9 int luaopen_glib (lua_State *L)

    10 {

    11 	lua_pushstring (L, LGLIB_OBJREGISTRY);

    12 	lua_newtable (L);

    13 	lua_createtable (L, 0, 1);

    14 	lua_pushstring (L, "__mode");

    15 	lua_pushstring (L, "v");

    16 	lua_settable (L, -3);

    17 	lua_setmetatable (L, -2);

    18 	lua_rawset (L, LUA_REGISTRYINDEX);

    19 

    20 	lua_createtable (L, 3, 0);

    21 	lua_pushvalue (L, -1);

    22 	lua_setglobal (L, "g");

    23 

    24 	luaopen_glib_main_context (L);

    25 	luaopen_glib_source (L);

    26 	luaopen_glib_timeout (L);

    27 	lua_pop (L, 3);

    28 

    29 	return 1;

    30 }

    31