如何在 OCaml 中输出一个空元组作为函数的一部分?

问题描述

我对 OCaml 很陌生,所以我为我的问题的基本性质道歉。我已经编写了代码输出布尔元组列表的头部,如下所示:

let head (lst : (bool * bool) list) : (bool * bool) =
    match lst with
    | (h1,h2) :: tl -> (h1,h2)
    | [] -> ();;

但是,在处理空列表的情况时,我遇到了输入错误,因为空元组的类型是 unit。无论如何我可以输出一个元组作为我的函数模式匹配的一部分吗?我不喜欢输出实际的布尔值,因为这些值在我的函数上下文中意味着某些东西。感谢您的帮助。

真诚的, 查尔斯

解决方法

没有 (bool * bool) 类型的“空”值。该类型的每个值都是一对布尔值。这是“强类型”含义的一部分。因此,对于空列表,您无法返回任何特殊值。

通常的处理方法是返回一个选项类型,Some (h1,h2) 表示非空列表,None 表示空列表;或者在输入为空列表时引发异常。

例如,标准函数 List.hd 具有完全相同的考虑,并且在传递空列表时引发异常。

# List.hd [];;
Exception: Failure "hd".