Method code for $list.sum()

[Turn on line numbering]

---

arg data;
var ret, i;

// returns a sum of each element in the list.
if (!data)
    return 0;
[ret, @data] = data;
for i in (data)
    ret += i;
return ret;

---

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