Skip to content

Commit

Permalink
Format files
Browse files Browse the repository at this point in the history
  • Loading branch information
@TheAngryByrd
TheAngryByrd committed Sep 15, 2023
1 parent b08ad3b commit e728af0
Show file tree
Hide file tree
Showing 24 changed files with 2,020 additions and 1,794 deletions.
207 changes: 107 additions & 100 deletions benchmarks/FSharpBenchmarks/AsynchonousCompletionBenchmark.fs
View file
Original file line number Diff line number Diff line change
Expand Up @@ -23,19 +23,20 @@ module AsyncHelpers =
let taskCTYield () =
fun (ct: CancellationToken) -> Task.Yield()

let fsharp_tenBindAsync_AsyncBuilder () = async {
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
return 100
}
let fsharp_tenBindAsync_AsyncBuilder () =
async {
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
do! asyncYield ()
return 100
}

let fsharp_tenBindAsync_PlyTaskBuilder () =
FSharp.Control.Tasks.Affine.task {
Expand Down Expand Up @@ -67,93 +68,99 @@ module AsyncHelpers =
return 100
}

let fsharp_tenBindAsync_TaskBuilder () = task {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_ValueTaskBuilder () = valueTask {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_CancellableTaskBuilder () = cancellableTask {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_CancellableTaskBuilder_BindCancellableTask () = cancellableTask {
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
return 100
}

let fsharp_tenBindAsync_CancellableValueTaskBuilder () = cancellableValueTask {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_CancellableValueTaskBuilder_BindCancellableTask () = cancellableValueTask {
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
return 100
}
let fsharp_tenBindAsync_TaskBuilder () =
task {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_ValueTaskBuilder () =
valueTask {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_CancellableTaskBuilder () =
cancellableTask {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_CancellableTaskBuilder_BindCancellableTask () =
cancellableTask {
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
return 100
}

let fsharp_tenBindAsync_CancellableValueTaskBuilder () =
cancellableValueTask {
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
do! taskYield ()
return 100
}


let fsharp_tenBindAsync_CancellableValueTaskBuilder_BindCancellableTask () =
cancellableValueTask {
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
do! taskCTYield ()
return 100
}


[<MemoryDiagnoser>]
Expand Down
Loading

0 comments on commit e728af0

Please sign in to comment.