9 lines
179 B
Haskell
9 lines
179 B
Haskell
module Main where
|
|
|
|
import qualified Lexer
|
|
import qualified Parser
|
|
|
|
main :: IO ()
|
|
main = do
|
|
source <- readFile "arithmetic.txt"
|
|
putStr $ show (Parser.parse $ Lexer.lex source)
|