Simple parse-dump main function, also fixed about everything

app/Main.hs

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