Function luaK_exp2RK

src/Chain/libraries/glua/lcode.cpp:556–589

int luaK_exp2RK(FuncState *fs, expdesc *e) {
    luaK_exp2val(fs, e);
    switch (e->k) {
    case VTRUE:
    case VFALSE:
    case VNIL: {
        if (fs->nk <= MAXINDEXRK) {  /* constant fits in RK operand? */
            e->u.info = (e->k == VNIL) ? nilK(fs) : boolK(fs, (e->k == VTRUE));
            e->k = VK;
            return RKASK(e->u.info);
        }
        else break;
    }
    case VKINT: {
        e->u.info = luaK_intK(fs, e->u.ival);
        e->k = VK;
        goto vk;
    }
    case VKFLT: {
        e->u.info = luaK_numberK(fs, e->u.nval);
        e->k = VK;
    }
                /* FALLTHROUGH */
    case VK: {
    vk:
        if (e->u.info <= MAXINDEXRK)  /* constant fits in 'argC'? */
            return RKASK(e->u.info);
        else break;
    }
    default: break;
    }
    /* not a constant in the right range: put it in a register */
    return luaK_exp2anyreg(fs, e);
}


void luaK_storevar(FuncState *fs, expdesc *var, expdesc *ex) {