Я тут придумал даже как упросить, Some и None теперь не надо

мап и тейквайл норм было б

let maybeAsyncUploadedFiles: Async<ResizeArray<int64>> =
  AsyncSeq.ofSeq files
  |> AsyncSeq.mapAsync tryUploadFileAsync
  |> AsyncSeq.fold(fun maybeList file ->
    maybeList
    |> Result.bind (fun (list: ResizeArray<_>) ->
      match file with
      | Result.Ok   (Some r) -> list.Add r  ; Result.Ok list
      | Result.Ok    None    -> list.Add -1L; Result.Ok list
      | Result.Error e       ->               Result.Error list)
    ) (Result.Ok(ResizeArray()))
  |> Async.map (function Ok x | Error x -> x)

EARLY return блять

:D

оно теперь собирает список до первой ошибки

и возвращает чо получилось

выглядит как говно, поэтому я виню дизайн @Dolfik

зачем фолд и мутабельное?

Ну вполне возможно дизайн говно :)

Почему нет? оно ж локально мутабельное

да там замапить в сек резалтов и тейквайл из саксесс

а потом замапить в то, что внеутри Ока

Кстати, да

что значит - ВОЗМОЖНО?!

Но я хз как ещё разрулить кейс, когда нужно сначала загрузить все файлы, а потом отправить запрос, при этом если файл не удалось загрузить - запрос не отправлять

ленивость ж

ну ок :)

ну мы тут не все грузим. а тока до первой ошибки

Либо всё, либо ничего

Причём грузим последовательно