anchor.diff:          | Parallel -> fun o -> { o with parallel = true }
           | Debug -> fun o -> { o with verbosity = LogLevel.Debug }
           | Filter _ -> fun o -> failwith "TODO: PRs much appreciated."
  -        | FilterTestList _ -> fun o -> failwith "TODO: PRs much appreciated."
  -        | FilterTestCase _ -> fun o -> failwith "TODO: PRs much appreciated."
  -        | ListTests _ -> id
  +        | Filter_Test_List _ -> fun o -> failwith "TODO: PRs much appreciated."
  +        | Filter_Test_Case _ -> fun o -> failwith "TODO: PRs much appreciated."
  +        | List_Tests -> id
   
   
   
  
positive.code:       | Some t -> t
        | None -> TestList ([], Normal)
      let config, isList = args |> ExpectoConfig.fillFromArgs config
      if isList then listTests tests else runTests config tests
negative.code:         | Parallel -> "Run all tests in parallel (default)."
          | Debug -> "Extra verbose printing. Useful to combine with --sequenced."
          | Filter _ -> "Filter the list of tests by a hierarchy that's slash (/) separated."
          | Filter_Test_List _ -> "Filter the list of test lists by a substring."
          | Filter_Test_Case _ -> "Filter the list of test cases by a substring."
          | List_Tests -> "Doesn't run tests, print out list of tests instead"
  
    [<CompilationRepresentation (CompilationRepresentationFlags.ModuleSuffix)>]
    module ExpectoConfig =
  