Evaluator

Sign in to test your solution.
-- Expressions -------------- data Exp = Const Int | Add Exp Exp | Sub Exp Exp | Mul Exp Exp deriving Show eval :: Exp -> Int eval = undefined -- Stack machine ---------------- data Inst = IPush Int | IAdd | ISub | IMul deriving Show type Prog = [Inst] type Stack = [Int] run :: Stack -> Prog -> Stack run = undefined -- Expression Compiler ---------------------- compile :: Exp -> Prog compile = undefined
You can submit as many times as you like. Only your latest submission will be taken into account.
Sign in to test your solution.