Function looplist

source/src/command.cpp:1148–1192

}

void looplist(char *list, char *varlist, char *body, bool withi)
{
    vector<char *> vars;
    explodelist(varlist, vars);
    if(vars.length() < 1) return;
    int columns = vars.length();
    if(withi) vars.add(newstring("i"));
    vector<ident *> ids;
    bool ok = true;
    loopv(vars) if(ids.add(newident(vars[i]))->type != ID_ALIAS) { conoutf("looplist error: \"%s\" is readonly", vars[i]); ok = false; }
    if(ok)
    {
        int ii = 0;
        vector<char *> elems;
        explodelist(list, elems);
        loopv(ids) pushident(*ids[i], newstring(""));
        loop_level++;
        if(elems.length() / columns > CSLIMIT_ITERATION) cslimiterr("loop iterations");
        else for(int i = 0; i <= elems.length() - columns; i += columns)
        {
            loopj(vars.length())
            {
                if(ids[j]->action != ids[j]->executing) delete[] ids[j]->action;
                if(j < columns)
                {
                    ids[j]->action = elems[i + j];
                    elems[i + j] = NULL;
                }
                else
                {
                    defformatstring(sii)("%d", ii++);
                    ids[j]->action = newstring(sii);
                }
            }
            execute(body);
            loop_skip = false;
            if(loop_break) break;
        }
        loopv(ids) popident(*ids[i]);
        loopv(elems) if(elems[i]) delete[] elems[i];
        loop_break = false;
        loop_level--;
    }
    loopv(vars) delete[] vars[i];
}
COMMANDF(looplist, "sss", (char *list, char *varlist, char *body) { looplist(list, varlist, body, false); });
COMMANDF(looplisti, "sss", (char *list, char *varlist, char *body) { looplist(list, varlist, body, true); });