awful lot of error handling

This commit is contained in:
Oleg Sobolev 2025-12-29 23:57:15 +03:00
parent 061303ccc0
commit 75a33c2d94
4 changed files with 103 additions and 67 deletions

View file

@ -8,8 +8,8 @@ import Control.Monad.State
data InterpreterState = InterpreterState
eval :: Expr -> Object
eval expr = evalState (interpret expr) InterpreterState
eval :: Expr -> IO Object
eval expr = return $ evalState (interpret expr) InterpreterState
interpret :: Expr -> State InterpreterState Object
interpret (Literal value) = return value