feat: Add high-level parse function to Parser

This commit is contained in:
Laborratte 5 2024-07-17 23:14:09 +02:00
parent 9d1a80bf2b
commit 929285b5ef
Signed by: Laborratte5
GPG key ID: 3A30072E35202C02
2 changed files with 9 additions and 2 deletions

View file

@ -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)