f# - FsUnit.Xunit 列表应该包含一个 x 使得 fx

Question

我不知道如何在FsUnit.Xunit.

我想检查列表中的至少一个元素是否满足谓词。我知道如何使用 来编写它should be True，但通常您可以通过使用专门的函数来获得更好的错误消息。

希望这段代码清楚地说明了我想要实现的目标：

open Xunit
open FsUnit.Xunit

type Foo = 
  {
    X : int
  }

[<Fact>]
let ``squares`` () =
  let xs =
    [ { X = 1 }; { X = 2 }; { X = 3 } ]
    |> List.map (fun foo -> { X = foo.X * foo.X })

  actual 
  |> should exists (satisfies (fun foo -> foo.X = 9)) // Not real code

Answer 1

我会这样做：

xs
    |> Seq.map (fun foo -> foo.X)
    |> should contain 9

错误输出很有用：

Expected: Contains 8
Actual:   seq [1; 4; 9]

如果你想要更多的上下文，你可以这样做：

open FsUnit.CustomMatchers

...

xs |> should containf (fun foo -> foo.X = 9)

错误输出为：

Expected: Contains <fun:squares@21-1>
Actual:   [{ X = 1 }; { X = 4 }; { X = 9 }]

这种方法的唯一缺点是“预期”消息不再显示您正在寻找的特定值。