Method code for $list.flatten()

[Turn off line numbering]
  1: arg list;
  2: var toret, elem;
  3: 
  4: // [[[x], x], x]   =>   [x, x, x]
  5: toret = [];
  6: for elem in (list) {
  7:     if (type(elem) == 'list)
  8:         toret += .flatten(elem);
  9:     else
 10:         toret += [elem];
 11: }
 12: return toret;

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

Tlon