This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
namespace Benchmark | |
open BenchmarkDotNet.Attributes | |
open BenchmarkDotNet.Running | |
[<HtmlExporter>] | |
type CommaAndDot() = | |
let mutable words : string list = [] | |
[<Params (0, 1, 10, 100)>] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
type QueuingSynchronizationContext() = | |
inherit SynchronizationContext() | |
let threadId = Thread.CurrentThread.ManagedThreadId | |
let queue = new BlockingCollection<_>() | |
override __.Post(cb, state) = | |
queue.Add((cb, state)) |