make_list_rc(sep) := block(
    counter: 1,
    make_item(item) := block(
        out: sconcat(counter, sep, item),
        counter: counter+1,
        print(out)
    ),
    map(make_item, ["first", "second", "third"])
)$

make_list_rc(". ")$