我正在阅读论文“Monad Transformers Step by Step”并通过示例进行操作。
在eval0示例中,表达式中有一个有意的非穷举模式case
:
eval0 :: Env -> Exp -> Value
eval0 env (Lit i) = IntVal i
eval0 env (Var n) = fromJust (Map.lookup n env)
eval0 env (Plus e1 e2) = let IntVal i1 = eval0 env e1
IntVal i2 = eval0 env e2
in IntVal (i1 + i2)
eval0 env (Abs n e) = FunVal env n e
eval0 env (App e1 e2) = let val1 = eval0 env e1
val2 = eval0 env e2
in case val1 of
FunVal env' n body ->
eval0 (Map.insert n val2 env') body
有什么方法可以在不添加“情况下的非详尽模式”的情况下抑制异常
_ -> error "Error"
到最后case
?本文后面的示例展示了如何使用ErrorT
monad 转换器来处理这种情况。