github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-24 23:42:31 +03:00
Code Issues Projects Releases Wiki Activity

visual separation ftw

Browse Source
This commit is contained in:
Ayman Nadeem 2019-10-23 11:58:51 -04:00
parent a2cd91579f
commit ed80f90faf
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
semantic-ast/src/Main.hs
View File

@ -39,9 +39,11 @@ parseAST = SemanticAST
<> help "Specify source input to parse"
))
main :: IO ()
main = generateAST =<< execParser opts
generateAST :: SemanticAST -> IO ()
generateAST (SemanticAST format color source) =
getByteStrings >>= traverse_ go