Function LoadConstants

src/Chain/libraries/glua/lundump.cpp:131–168

// 500M
const int g_constantslimit = 1024 * 1024 * 500;
static bool LoadConstants(LoadState *S, Proto *f) {
    int i;
    int n = LoadInt(S);
	if (n > g_constantslimit)
	{
		return false;
	}

    f->k = luaM_newvector(S->L, n, TValue);
    f->sizek = n;
    for (i = 0; i < n; i++)
        setnilvalue(&f->k[i]);
    for (i = 0; i < n; i++) {
        TValue *o = &f->k[i];
        int t = LoadByte(S);
        switch (t) {
        case LUA_TNIL:
            setnilvalue(o);
            break;
        case LUA_TBOOLEAN:
            setbvalue(o, LoadByte(S));
            break;
        case LUA_TNUMFLT:
            setfltvalue(o, LoadNumber(S));
            break;
        case LUA_TNUMINT:
            setivalue(o, LoadInteger(S));
            break;
        case LUA_TSHRSTR:
        case LUA_TLNGSTR:
            setsvalue2n(S->L, o, LoadString(S));
            break;
        default:
            lua_assert(0);
        }
    }
	return true;
}

// 500M
static bool LoadProtos(LoadState *S, Proto *f) {