@@ -6,15 +6,10 @@ open FSharp.Compiler.CodeAnalysis
66open FSharp.Compiler .Text
77open FSharp.Compiler .Diagnostics
88open FSharp.Test .ProjectGeneration
9- open BenchmarkDotNet.Engines
10-
11-
12- [<Literal>]
13- let FSharpCategory = " fsharp"
14-
9+ open FSharp.Benchmarks .Common .Categories
1510
1611[<MemoryDiagnoser>]
17- [<BenchmarkCategory( FSharpCategory ) >]
12+ [<BenchmarkCategory( LongCategory ) >]
1813type BackgroundCompilerBenchmarks () =
1914
2015 let size = 50
@@ -104,7 +99,7 @@ type BackgroundCompilerBenchmarks () =
10499 this.Benchmark.DeleteProjectDir()
105100
106101[<MemoryDiagnoser>]
107- [<BenchmarkCategory( FSharpCategory ) >]
102+ [<BenchmarkCategory( ShortCategory ) >]
108103type ParsingBenchmark () =
109104
110105 let mutable checker : FSharpChecker = Unchecked.defaultof<_>
@@ -134,7 +129,7 @@ type ParsingBenchmark() =
134129 failwith " ParseHadErrors"
135130
136131[<MemoryDiagnoser>]
137- [<BenchmarkCategory( FSharpCategory ) >]
132+ [<BenchmarkCategory( LongCategory ) >]
138133type NoFileSystemCheckerBenchmark () =
139134
140135 let size = 30
@@ -229,8 +224,8 @@ type TestProjectType =
229224
230225[<MemoryDiagnoser>]
231226[<ThreadingDiagnoser>]
232- [<BenchmarkCategory( FSharpCategory) >]
233227[<SimpleJob( warmupCount= 1 , iterationCount= 4 ) >]
228+ [<BenchmarkCategory( ShortCategory) >]
234229type TransparentCompilerBenchmark () =
235230
236231 let size = 30
@@ -331,9 +326,9 @@ type TransparentCompilerBenchmark() =
331326 benchmark.DeleteProjectDir()
332327
333328
329+ // needs Giraffe repo somewhere nearby, hence benchmarks disabled
334330[<MemoryDiagnoser>]
335331[<ThreadingDiagnoser>]
336- [<BenchmarkCategory( FSharpCategory) >]
337332[<SimpleJob( warmupCount= 1 , iterationCount= 8 ) >]
338333type TransparentCompilerGiraffeBenchmark () =
339334
@@ -399,7 +394,7 @@ type TransparentCompilerGiraffeBenchmark() =
399394 checkFile ( this.Project.SourceFiles |> List.last). Id expectOk
400395 }
401396
402- [<Benchmark>]
397+ // [<Benchmark>]
403398 member this.SomeWorkflow () =
404399
405400 use _ = Activity.start " Benchmark" [
0 commit comments