我有这个函数可以检查解析器列表是否有效。我收到错误:EQUALO LPAREN FN。有什么帮助吗?
fun oneOf [] = fn inp => NONE
| oneOf (p::ps) = (fn inp => case parse p inp of
NONE => oneOf ps inp
| SOME (v,out) => SOME (v,out))
我有这个函数可以检查解析器列表是否有效。我收到错误:EQUALO LPAREN FN。有什么帮助吗?
fun oneOf [] = fn inp => NONE
| oneOf (p::ps) = (fn inp => case parse p inp of
NONE => oneOf ps inp
| SOME (v,out) => SOME (v,out))