feat: Add high-level parse function to Parser
This commit is contained in:
parent
9d1a80bf2b
commit
929285b5ef
2 changed files with 9 additions and 2 deletions
|
|
@ -1,8 +1,9 @@
|
|||
module Main where
|
||||
|
||||
import qualified Lexer
|
||||
import qualified Parser
|
||||
|
||||
main :: IO ()
|
||||
main = do
|
||||
source <- readFile "arithmetic.txt"
|
||||
putStr $ show (Lexer.lex source)
|
||||
putStr $ show (Parser.parse $ Lexer.lex source)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue