processFile :: String -> IO ParseResult
processFile f = glmParser f `fmap` readFile f
processFile :: String -> IO ParseResult
processFile f = glmParser f `fmap` readFile f
processFile f = glmParser f `fmap` readFile f