ubcc/app/Main.hs

9 lines
221 B
Haskell

module Main (main) where
import qualified Text.Parsec as Parsec
import qualified Ubc.Parse.Syntax.File as File
main :: IO ()
main = do
text <- getContents
print $ Parsec.parse File.parse "<stdin>" text