list - F# If 语句类型不匹配

Question

我有点困惑，我连续尝试了 2 个小时，试图让这段代码正常工作，但我迷路了。

let DropColumn list =
    if List.exists List.isEmpty list then "empty value"
    else
    list |> List.map List.tail

这给我一个错误error FS0001: The type 'string' does not match the type ''a list'

Answer 1

在函数式编程中处理失败的常用方法是使用 Result类型，本质上定义为:

type Result<'T,'TError> =
    | Ok of 'T
    | Error of 'TError

要将其应用于您的代码，我们只需将 string 包装在带有 Error 的不愉快路径中，并将 list 从带有确定:

let DropColumn list =
    if List.exists List.isEmpty list then
        Error "empty value"
    else
        list |> List.map List.tail |> Ok

然后你可以使用模式匹配来使用它:

match DropColumn myList with
| Ok newList ->
    newList
| Error message ->
    printfn "Error occurred: %s" message
    []