added vtask { } for ScenarioStatsActor to improve performance

PragmaticFlow · Nov 24, 2022 · e4c5922 · e4c5922
1 parent 96aa73a
commit e4c5922
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 6 deletions.
diff --git a/src/NBomber/Domain/DomainTypes.fs b/src/NBomber/Domain/DomainTypes.fs
@@ -1,12 +1,7 @@
 module internal NBomber.Domain.DomainTypes
 
 open System
-open System.Collections.Generic
-open System.Threading
 open System.Threading.Tasks
-
-open Serilog
-
 open NBomber.Contracts
 
 type SessionId = string

diff --git a/src/NBomber/Domain/Stats/ScenarioStatsActor.fs b/src/NBomber/Domain/Stats/ScenarioStatsActor.fs
@@ -6,6 +6,7 @@ open System.Runtime.CompilerServices
 open System.Threading.Channels
 open System.Threading.Tasks
 
+open FSharp.Control.Tasks
 open FSharp.UMX
 open Serilog
 
@@ -203,7 +204,7 @@ type ScenarioStatsActor(logger: ILogger,
     let mutable _stop = false
     let _channel = Channel.CreateUnbounded<ActorMessage>()
 
-    let loop () = backgroundTask {
+    let loop () = vtask {
         try
             while not _stop do
                 match! _channel.Reader.ReadAsync() with