Method finalize

Source/Misc/luabind/src/class_rep.cpp:331–356

}

void luabind::detail::finalize(lua_State* L, class_rep* crep)
{
    if (crep->get_class_type() != class_rep::lua_class) return;

//  lua_pushvalue(L, -1); // copy the object ref
    crep->get_table(L);
    lua_pushliteral(L, "__finalize");
    lua_gettable(L, -2);
    lua_remove(L, -2);

    if (lua_isnil(L, -1))
    {
        lua_pop(L, 1);
    }
    else
    {
        lua_pushvalue(L, -2);
        lua_call(L, 1, 0);
    }

    for (std::vector<class_rep*>::const_iterator
            i = crep->bases().begin(); i != crep->bases().end(); ++i)
    {
        if (*i) finalize(L, *i);
    }
}