История изменений
Исправление Xenius, (текущая версия) :
str.join может принимать любую (еще раз — ЛЮБУЮ) последовательность и конкатенацию надо реализовать только один раз в одном месте.
А где-то не так?
А веселиться с иерархией классов и протаскивать join в базовый класс
В нормальных можно реализовать join одной строчкой вроде:
let join delim seq = fold_left (fn a b -> a . delim . a) (map tostring seq) Никаких извращений с классами не нужно.
Исходная версия Xenius, :
str.join может принимать любую (еще раз — ЛЮБУЮ) последовательность и конкатенацию надо реализовать только один раз в одном месте.
А где-то не так?
А веселиться с иерархией классов и протаскивать join в базовый класс
В нормальных можно реализовать join одной строчкой вроде:
let join delim seq = fold_left (fn a b -> a . delim . a) (map tostring seq)