Method code for $parse_lib.range()

[Turn off line numbering]
  1: arg str;
  2: var out;
  3: 
  4: out = split(str, " *- *");
  5: if (out.length() == 1) {
  6:     if ("," in str)
  7:         return ['specific, str];
  8:     out = [(> ._range(str) <), 'single];
  9: } else if (out.length() == 2) {
 10:     out = out.replace(1, (> ._range(out[1]) <));
 11:     out = out.replace(2, (> ._range(out[2]) <));
 12: } else {
 13:     throw(~range, "Invalid range reference.");
 14: }
 15: return out;

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

Tlon