From 3bf12e614c65f22f012b35a19eafad28ad3d4ed5 Mon Sep 17 00:00:00 2001 From: Thomas Harning Jr Date: Wed, 5 Sep 2007 23:05:05 -0400 Subject: Completely refactored event_callback creation out into event_callback. --- src/event_callback.c | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'src/event_callback.c') diff --git a/src/event_callback.c b/src/event_callback.c index 0d320eb..f2cd0bc 100644 --- a/src/event_callback.c +++ b/src/event_callback.c @@ -4,6 +4,8 @@ #include #include +#define EVENT_CALLBACK_ARG_MT "EVENT_CALLBACK_ARG_MT" + void freeCallbackArgs(le_callback* arg, lua_State* L) { if(arg->base) { arg->base = NULL; @@ -45,6 +47,20 @@ static int luaevent_cb_gc(lua_State* L) { return 0; } +le_callback* event_callback_push(lua_State* L, int baseIdx, int callbackIdx) { + le_callback* cb; + le_base *base = event_base_get(L, baseIdx); + luaL_checktype(L, callbackIdx, LUA_TFUNCTION); + cb = lua_newuserdata(L, sizeof(*cb)); + luaL_getmetatable(L, EVENT_CALLBACK_ARG_MT); + lua_setmetatable(L, -2); + + lua_pushvalue(L, callbackIdx); + cb->callbackRef = luaL_ref(L, LUA_REGISTRYINDEX); + cb->base = base; + return cb; +} + int event_callback_register(lua_State* L) { luaL_newmetatable(L, EVENT_CALLBACK_ARG_MT); lua_pushcfunction(L, luaevent_cb_gc); -- cgit v1.2.3