F# Flood: VPN skill issue

Эпично

vc надо брать

Тэк, вопрос

Сурьезный

Я последовательно читаю массивы байт из стрима и отправляю их на сервер

В ответ приезжает bool

допустим

Можно ли как-то написать unfold, чтобы неотправленные добавлялись в конец сиквенса на отправку?

то есть у тебя асинк секвенс?

asyncSeq?

async{ use stream=File.OpenRead(file) let md5=Hash.md5 stream|>Core.printArray let size=stream.Length let id=Core.rndInt64() let partSize=8192L let totalParts=total partSize size let pF=if(size<=1024L*10L*1024L) then (small id )else (big id (totalParts|>int)) use reader=new BinaryReader(stream) let parts=Seq.unfold (fun (r,i)->async{ let data=reader.ReadBytes (partSize|>int) let! (res,index)=uploadPart uploadRoutine pF (i,data) }) (reader,1) return()

узнаваемый стиль Василия

Мне там тротлинг нужен

которого карают за пробелы

В смысле инденты

Вот что надо записать в unfold, чтобы: 1. data читалась один раз 2. Если не получилось, в конец сиквенса уезжало

Я так понимаю, в аккумулятор надо добавить seq

а в конце сиквенса это что значит?

Ааа, понял тебя сейчас

Ну я отправляю пачками по 8, например