Method code for $code_lib._trace_listing()

[Turn off line numbering]

---

  1: arg list;
  2: var indent, i, out, t, j;
  3: 
  4: indent = "";
  5: out = [" Tick#  Event", " -----  -----------------------------"];
  6: t = 0;
  7: for i in (list) {
  8:     if (type(i) == 'integer) {
  9:         if (indent)
 10:             indent = indent.subrange(3);
 11:     } else {
 12:         if (!t)
 13:             t = i[1];
 14:         j = strfmt("%6r  %l%l", i[1] - t, indent, ._show_ref(i));
 15:         out += [j.chop(79)];
 16:         indent += "  ";
 17:     }
 18:     refresh();
 19: }
 20: return out;

---

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit