anchor.diff:  // ----------------------------------------------------------------------------------------------
   
   // ----------------------------------------------------------------------------------------------
  +let performanceRatio v = max 1.0 v
  +// ----------------------------------------------------------------------------------------------
  +
  +// ----------------------------------------------------------------------------------------------
   let performanceTestCases (dumper : string -> unit) =
     let testCases =
       Array.concat [|positiveTestCases; negativeTestCases; sampleTestCases; generatedTestCases |]
  
positive.code:     "PERFORMANCE TEST (REFERENCE)"
      ReferenceJsonModule.parse
      200
      4.0
      testCases
      dumper
  // ----------------------------------------------------------------------------------------------
  
negative.code:     "PERFORMANCE TEST (FSHARP.DATA)"
      MiniJson.Tests.FSharpData.dummyParse  // As we don't want to pay overhead of data conversion
      1000
      (performanceRatio 1.5)
      testCases
      dumper
  // ----------------------------------------------------------------------------------------------
  