anchor.diff:          ()
   
   module Usage =
  +    open global.PerfUtil
  +
  +    module Types =
  +        type Y = { a : string; b : int }
  +        type X = { c : Nullable<int>; d : uint64 }
  +
       type Serialiser =
  +        inherit ITestable
           abstract member Serialise<'a> : 'a -> unit
   
       type SlowSerialiser() =
  
positive.code:                 System.Threading.Thread.Sleep(20)
  
      let alts : Serialiser list = [ FastSerialiser(); FastSerialiserAlt() ]
  
      testList "performance tests" [
          testPerfCompare "implementations of Serialiser" (SlowSerialiser()) alts [
              perfTest "serialising string" <| fun s ->
                  s.Serialise("wowowow")
              ]
          ]
  
  type FsCheck =
      static member PerfCompare(name, _ : TODO) =
          ()
  
  (* EXAMPLES:
  
  
negative.code:             let results = PerfTest.run tester tests
              () // TODO: handle saving of results
  
      let testPerfCompare<'a when 'a :> ITestable> name (subj : 'a) (alts : 'a list) (tests : 'a PerfTest list) =
          testPerfCompareWithConfig CompareConfig.Defaults name subj alts tests
  
      let testPerfHistoryWithConfig config name =
          ()
  