модуль строки тип Байты = []Байт тип Сборщик* = класс { байты = Байты[] число-символов := 0 } фн (сб: Сборщик) добавить строку*(ст: Строка) { пусть б = ст(:Байты) // ускорить - Байтовка сб.число-символов := сб.число-символов + длина(ст) сб.байты.добавить(б...) } фн добавить-символ(б: Байты, с: Символ)@внеш("имя":"tri_vectorAppend_TSymbol_to_Bytes") фн (сб: Сборщик) добавить символ*(си: Символ) { добавить-символ(сб.байты, си) сб.число-символов++ } фн (сб: Сборщик) символов*(): Цел64 { вернуть сб.число-символов } фн (сб: Сборщик) байтов*(): Цел64 { вернуть длина(сб.байты) } фн (сб: Сборщик) строка*(): Строка { вернуть сб.байты(:Строка) }