anchor.diff:              | Some t -> t
               | None -> TestList []
           defaultMain tests args
  +
  +// Functions for C#/VB.NET :
           
   [<Extension>]
   type Test with
  
positive.code: 
      module Seq =
          let cons x xs = seq { yield x; yield! xs }
  
      type MemberInfo with
          member m.HasAttributePred (pred: Type -> bool) =
  
negative.code:     /// Skip this test
      let inline skiptestf fmt = Printf.ksprintf (fun msg -> raise <| IgnoreException msg) fmt
  
      /// Builds a list/group of tests
      let inline testList name tests = TestLabel(name, TestList tests)
  
      /// Builds a test case
      let inline testCase name test = TestLabel(name, TestCase test)
  
      /// Applies a function to a list of values to build test cases
      let inline testFixture setup = 
           Seq.map (fun (name, partialTest) ->
                          testCase name (setup partialTest))
  
      /// Applies a value to a list of partial tests
      let inline testParam param =
           Seq.map (fun (name, partialTest) ->
                          testCase name (partialTest param))
  