Function VectorOrObjectToString

dev/src/vmdata.cpp:544–583

}

void VectorOrObjectToString(VM &vm, string &sd, PrintPrefs &pp, char openb, char closeb,
                            iint len, iint width, const Value *elems, bool is_vector,
                            std::function<const TypeInfo &(iint)> getti) {
    sd += openb;
    if (pp.indent) sd += '\n';
    auto start_size = sd.size();
    pp.cur_indent += pp.indent;
    auto Indent = [&]() {
        for (int i = 0; i < pp.cur_indent; i++) sd += ' ';
    };
    for (iint i = 0; i < len; i++) {
        if (i) {
            sd += ',';
            sd += (pp.indent ? '\n' : ' ');
        }
        if (pp.indent) Indent();
        if (iint(sd.size() - start_size) > pp.budget) {
            sd += "....";
            break;
        }
        auto &ti = getti(i);
        if (pp.depth || !RTIsRef(ti.t)) {
            PrintPrefs subpp(pp.depth - 1, pp.budget - iint(sd.size() - start_size), true,
                             pp.decimals);
            subpp.indent = pp.indent;
            subpp.cur_indent = pp.cur_indent;
            if (RTIsStruct(ti.t)) {
                vm.StructToString(sd, subpp, ti, elems + i * width);
                if (!is_vector) i += ti.len - 1;
            } else {
                elems[i].ToString(vm, sd, ti, subpp);
            }
        } else {
            sd += "..";
        }
    }
    pp.cur_indent -= pp.indent;
    if (pp.indent) { sd += '\n'; Indent(); }
    sd += closeb;
}

void LObject::ToString(VM &vm, string &sd, PrintPrefs &pp) {
    if (CycleCheck(sd, pp)) return;