Method code for $integer.parse_range()

[Turn off line numbering]

---

  1: arg range;
  2: var r1, r2, reg;
  3: 
  4: if ("-" in range) {
  5:     reg = regexp(range, "([0-9^#\.]+) *- *([0-9\$\.]+)");
  6:     return [(> ._range_type(reg[1]) <), (> ._range_type(reg[2]) <)];
  7: } else {
  8:     return [(> ._range_type(range) <), 'none];
  9: }
 10: 
 11: // ("1-5") => (1, 5)      -- 1, 5
 12: // ("1-$") => (1, 'end)   -- 1, 'end (end number)
 13: // (".-3") => ('cur, 3)   -- 'cur (current number), 3
 14: // ("^-3") => ('bgn, 3)   -- 'bgn (beginning number), 3
 15: // ("#-3") => ('bgn, 3)   -- 'bgn (beginning number), 3

---

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