app/Main.hs


1
2
3
4
5
6
7
8
9

import GSA

import qualified Data.Text.IO as T (readFile)
import Data.Text (Text)

main :: IO ()
main = do
  t <- T.readFile "main.gsa"
  print $ parse "main.gsa" t