Function ReadSerializedTable

engine/script/src/test/test_script_table.cpp:61–94

 */
typedef double (*TableGenFunc)(double);
static int ReadSerializedTable(lua_State* L, uint8_t* source, uint32_t source_length, TableGenFunc fn, int key_stride)
{
    int error = 0;
    const double epsilon = 1.0e-7f;
    char* aligned_buf = (char*)source;

    dmScript::PushTable(L, aligned_buf, source_length);

    for (uint32_t i=0; i<0xfff; ++i)
    {
        lua_pushnumber(L, i * key_stride);
        lua_gettable(L, -2);
        EXPECT_EQ(LUA_TNUMBER, lua_type(L, -1));
        if  (LUA_TNUMBER != lua_type(L, -1))
        {
            printf("Invalid key on row %d\n", i);
        }
        double value_read = lua_tonumber(L, -1);
        double value_expected = fn(2.0 * M_PI * (double)i / (double)0xffff);
        double diff = fabs(value_read - value_expected);
        EXPECT_GT(epsilon, diff);
        lua_pop(L, 1);

        if (epsilon < diff)
        {
            error = 1;
            break;
        }
    }

    lua_pop(L, 1);

    return error;
}

static int ReadUnsupportedVersion(lua_State* L)
{