anchor.diff:  
     module Seq =
       let cons x xs = seq { yield x; yield! xs }
  +
  +  module Option =
  +    let orDefault def =
  +      Option.fold (fun s t -> t) def
   
     type Type with
       static member TryGetType t =
  
positive.code:     |> Test.toTestCodeList
      |> Seq.iter (fun t -> printfn "%s" t.name)
  
    /// When the failOnFocusedTests switch is activated this function that no
    /// focused tests exist.
    ///
    /// Returns true if the check passes, otherwise false.
    let passesFocusTestCheck config tests =
      let isFocused : FlatTest -> _ = function t when t.state = Focused -> true | _ -> false
      let focused = Test.toTestCodeList tests |> List.filter isFocused
      if focused.Length = 0 then true
      else
        logger.info (
          eventX "It was requested that no focused tests exist, but yet there are {count} focused tests found."
          >> setField "count" focused.Length)
        false
  
    /// Runs tests with supplied options. Returns 0 if all tests passed, otherwise 1.
    let runTests config (tests:Test) =
      let run = if config.parallel then runParallel else run
  
negative.code:   /// Runs tests in this assembly with supplied command-line options.
    /// Returns 0 if all tests passed, otherwise 1
    let runTestsInAssembly config args =
      let tests = testFromThisAssembly () |> Option.orDefault (TestList ([], Normal))
      let config, isList = args |> ExpectoConfig.fillFromArgs config
      let tests = tests |> config.filter
      if isList then
  