14 lines
310 B
Text
14 lines
310 B
Text
integer p;
|
|
list l;
|
|
|
|
file().b_affix("-6,-3--1,3-5,7-11,14,15,17-20").news(l, 0, 0, ",");
|
|
for (, text s in l) {
|
|
if ((p = b_frame(s, '-')) < 1) {
|
|
o_(s, ",");
|
|
} else {
|
|
p -= s[p - 1] == '-' ? 1 : 0;
|
|
call_s(o_, 0, s.cut(0, p).atoi, s.erase(0, p).atoi + 1, 1, ",");
|
|
}
|
|
}
|
|
|
|
o_("\n");
|