eval :: Expr -> [Int]