module Main (main) where import Data.Text.Ubc.Parse main :: IO () main = do text <- getContents someFunc return ()