我和Char.chr有错误

Question

我制作了自己的大写字母，但在测试时我使用Char.chr Invalid_argument＆＃34; Char.chr＆＃34;

一直得到同样的错误

这是我用于：

的测试

let rec letra n =
    let c = Char.chr n in 
        if n=256 then -1
        else if uppercase c = Char.uppercase c then letra (n+1)
            else n;;

你知道为什么要给我这个消息吗？

Answer 1

函数Char.chr不接受超过255的值。

在调用Char.chr之前，您的测试if n=256应该完成。

请注意，{4.0}自4.03以来已被弃用，因为它是为ISO Latin-1设计的。