Так мы кода бота не видели

да вроде скинули выше же

Чё, хттп клиент говорите тормозит?

Вообще шарповая либа держит один хттп клиент

Чё, хттп клиент говорите тормозит?

берёшь фидлер, ебашишь боту 1000 запросов и смотришь

Которая самая популярная

как они в очередь выстраиваются

особенно заметно если каждый коннект будет лить по 100мб

А не может быть траблов из-за newtonsoft.json

Ибо там один экземпляр используется

Мб он как-то лочится

Один экземпляр провайдера?

Мб он как-то лочится

ты не хочешь всё же про сетевые коннекты подумать?

Как вариант

https://docs.microsoft.com/en-US/dotnet/api/system.net.servicepointmanager.defaultconnectionlimit

Any changes to the DefaultConnectionLimit property affect both HTTP 1.0 and HTTP 1.1 connections. It is not possible to separately alter the connection limit for HTTP 1.0 and HTTP 1.1 protocols. When used in the server environment (ASP.NET) DefaultConnectionLimit defaults to higher number of connections, which is 10.

https://docs.microsoft.com/en-US/dotnet/api/system.net.servicepointmanager.defaultconnectionlimit

Мне казалось с ним что-то в неткоре делали

Один экземпляр провайдера?

А не

https://github.com/Dolfik1/Funogram/blob/master/Funogram/Tools.fs#L41

Вот так

Мне казалось с ним что-то в неткоре делали

подняли до 4 по умолчанию?)

Хз, но в голове есть что-то про изменения

https://github.com/Dolfik1/Funogram/blob/master/Funogram/Tools.fs#L118

Вот тут поглядите, мб что-то заметите

Инлайн, не?

Инлайн?

стоп, а что это вообще такое

async { let url = getUrl token methodName if param.IsNone || param.Value.Length = 0 then return client.GetStringAsync(url) |> Async.AwaitTask |> Async.RunSynchronously |> parseJson<'a>

async { Async.RunSynchronously }

Это не я

Глазастый

Это рыба писала

Нефиг

это прям заявка на успех

А чем просто AwaitTask не подошел?

Так это в самом главном методе - хттп реквест

И return!

прям нормальный такой блок треда

как в старые добрые

И return!

Не, там parsejson

Тогда let!=

Потом Parsejson

Потом return

Ye b yb;t nfv

Ну и ниже там

let result = client.PostAsync(url, form) |> Async.AwaitTask |> Async.RunSynchronously return parseJson<'a> (result.Content.ReadAsStringAsync() |> Async.AwaitTask |> Async.RunSynchronously)

let result = client.PostAsync(url, form) |> Async.AwaitTask |> Async.RunSynchronously return parseJson<'a> (result.Content.ReadAsStringAsync() |> Async.AwaitTask |> Async.RunSynchronously)

да там вообще нормально намазано

синхронных блоков

КОПИПАСТ

прям посреди асинхронной монады

Так?

ну да

УГу

Но парс тоже можно в асинк завернуть

Щас чуть отрефакторю

Ты там ниже тоже

Убей нах

короче, во всем кода должен быть один Async.RunSynchronously, где-то в районе функции main

прям ctrl-f и убирай все Async.RunSynchronously

Async.Start же

Async.Start же

тогда main выйдет!

и конец программе)))

Токен жди

ну ждать всё равно что-то надо

Мейлбокс

Норм тема, отвечаю

Мейлбокс

Василий, а ты настойчивый )

Это его Акка укусила!

Василий, а ты настойчивый )

Отож

скоро мы ему прививку гопака сделаем

:D

Это его Акка укусила!

Акка - следующий этап

:D

я даже догадываюсь - чем :)

War hopac

War hopac

Капоэйра!

RunSynchronously остаётся в паре мест

https://github.com/Dolfik1/Funogram/blob/master/Funogram/Bot/Bot.fs#L78

Думаю тут можно оставить

Бля, тут в соседнем чате скинули ссылку, какой-то транс на скала дейз рассказывает про спарк