f# - 单元测试 : '[] |> should equal List.empty' is not working as expected

Question

我有以下代码，但测试失败:

open Xunit
open FsUnit.Xunit

let rec openOrSenior xs = 
    match xs with
    | head :: tail when fst head >= 55 && snd head >= 7 -> "Senior" :: openOrSenior tail
    | head :: tail -> "Open" :: openOrSenior tail
    | [] -> []

[<Fact>]
let ``empty input gives empty result``() =
    openOrSenior [] |> should equal List.empty

测试失败，出现以下匹配错误

FsUnit.Xunit+MatchException : Exception of type 'FsUnit.Xunit+MatchException' was thrown. Expected: Equals []
Actual: was []

Answer 1

equal在 FsUnit 中做了一些奇特的匹配是 be只是身份函数。
Here is the link source

如果您使用:

|> should be Empty