Function VectorOrObjectToString

lobster/src/vmdata.cpp:321–360

}

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

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