Haskell - 定义函数所需的 Num Char 实例

Question

我想编写一个带有 3 个输入参数和 1 个输出参数的简单递归函数:

getLengthOfNumber :: (String, Int, Int) -> Int
getLengthOfNumber (n, i, res)
    | isCharDigit(n!!i+1) = getLengthOfNumber (n, i+1, res+1)
    | otherwise = res

为什么 Hugs 会抛出错误“定义 getLengthOfNumber 所需的 Num Char 实例”？

Answer 1

!! 的优先级高于 +，因此 n!!i+1 被解析为 (n !! i ) + 1，它尝试向字符串的元素加一，仅当 Char 是数字时才有效。你应该写 n !! (i+1)。