gistfile1.h

/* Class-related functions {{{ */
gpointer ms_lua_toclass(LuaState *L, const char *class, int index)/*{{{*/
{
    gpointer p = lua_touserdata(L, index);
    if (p == NULL) luaL_typerror(L, index, class);
    return p;
}/*}}}*/

gpointer ms_lua_checkclass(LuaState *L, const char *class, int index)/*{{{*/
{
    luaL_checktype(L, index, LUA_TUSERDATA);
    gpointer p = luaL_checkudata(L, index, class);
    if (p == NULL) luaL_typerror(L, index, class);
    return p;
}/*}}}*/