我有以下代码:
parseExpr :: [String] -> (Ast,[String])
parseExpr [] = error "Incorrect"
parseExpr (s:ss) | all isDigit s = (Tall (read s),ss)
| s == "-" = let (e,ss') = parseExpr ss in (Min e,ss')
| s == "+" = (Sum e e',ss'') where
(e,ss') = parseExpr ss
(e',ss'') = parseExpr ss'
| s == "*" = (Mult e e',ss'') where
(e,ss') = parseExpr ss
(e',ss'') = parseExpr ss'
当我尝试运行它时,我收到一条错误消息“输入'|'上的解析错误。它正在谈论的行是这一行:
...
(e',ss'') = parseExpr ss'
-> | s == "*" = (Mult e e',ss'') where
(e,ss') = parseExpr ss
...
我想我明白为什么了。我想这是因为我上面有两行没有被守卫屏蔽,当下面突然出现另一个守卫时,haskell 会感到困惑。但是在这些情况之后,我怎样才能添加额外的警卫呢?
我尝试使用分号分隔新行,但我对 Haskell 很陌生,因此对它的语法了解不多。