You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 

19 lines
283 B

module Main where
import Lexer.Support
import Lexer
import Debug.Trace (traceM)
import Control.Monad.RWS
main :: IO ()
main = do
putStrLn "hello world"
lexAll :: Lexer ()
lexAll = do
tok <- scan
case tok of
TkEOF -> pure ()
x -> do
traceM (show x)
lexAll