вот так катит, да. Но тут еще в тупликах дополнительная аллокация торчит "aaaabbbcca" |> Seq.fold(fun (acc: ResizeArray<char * int ref>) char -> if acc.Count > 0 then let (oldChar, oldCounter) = acc.[acc.Count - 1] if oldChar = char then oldCounter := !oldCounter + 1 else acc.Add (char, ref 1) else acc.Add (char, ref 1) acc ) (ResizeArray())

ну то есть в массиве туплей каждый тупль будет состоять из чара и референса на объект с интом

ну то есть в массиве туплей каждый тупль будет состоять из чара и референса на объект с интом

а что за объект с интом?

тупль в фшарпе иммутабельный, поэтому единственный способ обойти, сделать свою структуру с мутабельным полем

а что за объект с интом?

реф на куче. что-то вроде явного боксинга

но особо хитрого

реф на куче. что-то вроде явного боксинга

можешь супер маленький пример на шарплабе показать?

на самом деле оно позволяет сделать что угодно мутабельным

можешь супер маленький пример на шарплабе показать?

https://sharplab.io/#v2:EYLgxg9gTgpgtADwGwBYA0AbEAzAzgHwxgBcACAWwFdiBDYI0m0gXlNm1IEYBYAKD6YhWAJj58AygE9cxGOQB0AYQgA7XBCLyA6lACWsgDK6VMUgEIaQA===

FSharpRef яснопонятно

ну просто утаскивание на кучу

чтобы передавать по ссылке

ну просто утаскивание на кучу

вот это странно - когда ссылка утекает на кучу не в боксинге, это вызывает вопросы)

вот это странно - когда ссылка утекает на кучу не в боксинге, это вызывает вопросы)

тут явно. какие вопросы?

я ж пишу = ref 1

у нее даже тип другой, ты инт в инт реф не засунешь

или наоборот

у нее даже тип другой, ты инт в инт реф не засунешь

есть ведь tracking reference которые для ref return, я думал оно может использовать такой же механизм

есть ведь tracking reference которые для ref return, я думал оно может использовать такой же механизм

этому рефу больше лет чем сишарпу

потому что он пришел из окамла)))

потому что он пришел из окамла)))

👍

а в него пришел хз откуда

это легаси и не стоит юзать

поэтому я хотел сделать на byref

но байреф там чот сложно

там самая большая сложность в захвате байрефов в лямбде. Если переписать на цикл без лямбды все збс, да

Ты плохо читал условие задачи

точно! Тогда так:

нот бед

а если строка пустая?)

точно! Тогда так:

Тоже норм вариант, кстати

а если строка пустая?)

тогда: panic!()

Seq.empty жи

йа тоже могу, выебистая версия

let input = "aaabbbcca" let rec partitionWhile pred list taken = match list with | [] -> taken, [] | item :: list' when pred item -> partitionWhile pred list' (item :: taken) | item :: list' -> taken, list' let rec solve input res = match input with | [] -> List.rev res | expectedChar :: input' -> let taken, input' = partitionWhile (fun actualChar -> actualChar = expectedChar) input' [] solve input' ((expectedChar, List.length taken + 1) :: res) printfn "%A" (solve (List.ofSeq input) [])

(я не знаю зачем я это сделал)

уже на новой работе?

А вот теперь уже на новой.

Всем спасибо за поддержку и добрые слова.

Поздравляю! ну рассказывай

Поздравляю! ну рассказывай

У Василия в команде буду трудиться.

все таки смог перевернуть массив значит))

скоро Василий всех возьмет на работу и чат переименуем в /work

У Василия в команде буду трудиться.

Добро пожаловать в android разработку, buddy 😌

У Василия в команде буду трудиться.

Будешь расширять кругозор?

У Василия в команде буду трудиться.

поздравляю!

Добро пожаловать в android разработку, buddy 😌

а потом мы все скинемся ему на медный памятник

еще при жизни

Главное что бы токсиком не стал, на почве мобилок

У Василия в команде буду трудиться.

поздравляю!

где Василий будет сидеть на #

У Василия в команде буду трудиться.

мои поздравления и пожелания успехов)

Всем большое спасибо!

У Василия в команде буду трудиться.

Поздравляю

я, конечно, ща отхвачу за код не на F#, но вышеупомянутая задача красиво решает с помощью паттерн матчинга где можно указывать константы (по-моему где-то даже был реквест на это) def solve(list, {c, count}=state, arr) do case list do [] -> Enum.reverse([state | arr]) [^c | xs] -> solve(xs, {c, count + 1}, arr) [x | xs] -> solve(xs, {x, 1}, [state | arr]) end end

У Василия в команде буду трудиться.

Congratulences!

ага, хотя там была не задачка а шутка

я уже сам ели сдерживаюсь!!

была, медленно!

Можно всё это сделать и чисто, и быстро, но нужны тогда лин/афинные типы

Типы, значения который можно использовать только один раз (линейные) или максимум один раз (афинные). В таком случае внутри функции, которая принимает линейный аргумент и его возвращает, его можно спокойно мутировать, сохраняя чистоту всего построения, потому что в таком случае известно, что никто кроме этой функции этим значением не владеет при её исполнении

На афинных типах построен раст, а линейные вот сейчас буквально добавили в хаскель

Плюс ещё второй идрис имеет обобщенный вариант таких типов, где вообще можно произвольное число использований назначить типу

У меня есть, но это скорее часть инфраструктуры + некоторые прототипные вещи.

Рад бы больше его использовать, но я что-то стал слишком байтоебом для хаскеля

Раньше было сильно хуже, сейчас хаскель в vscode стал более-менее приемлимым для использования.

Было плохо, сейчас на самом деле ощутимо лучше стало.

Раньше из разумных вариантов - были емаксовый плагин, либо упоротый и странный плагин к идее

Теперь есть LSP нормальный

ну там еще второй вариант

ну и чо. функция чистая?

Хаскель вне своего рантайма и компилятора - это относительно бессмысленная штука

Ленивые языки на обычных рантаймах плохо себя покажут, если только не пойти в whole program optimization + defunctionalization как в каком-нибудь GRIN

Вопрос в том, что скорость работы ощутимо просядет.

Раньше из разумных вариантов - были емаксовый плагин, либо упоротый и странный плагин к идее

имаксовый плагин, кстати, всегда хаскель хорошо поддерживал

Ничо, будешь преподом в институте

Цветной, как последний срок наркомана?

а чо, в Имаксе нельзя код покрасить кастомно? Не верю! - с упреком вздухнул Станиславский.

а чо, в Имаксе нельзя код покрасить кастомно? Не верю! - с упреком вздухнул Станиславский.

Можно, но скорее всего для этого свой derived mode надо будет писать. Ну или если быстро хакнуть - делать buffer-local фейсы.

хз, я как-то ваще не чувствителен к раскраске. мне наверно и минимум цветов хватит.

Дон читает по-русски https://twitter.com/dsymetweets/status/1358706912834056192?s=21