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

add Read instances

Browse Source
This commit is contained in:
Ayman Nadeem 2019-10-10 14:08:41 -04:00
parent 5a707829d2
commit a589448ea2
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/CLI.hs
View File

@ -17,6 +17,7 @@ data SemanticAST = SemanticAST
{ sourceFilePath :: Input
, format :: Format
}
} deriving (Read)
parseAST :: Parser SemanticAST
parseAST = SemanticAST
@ -54,6 +55,7 @@ data Format = Show
data Input
= FileInput FilePath
| StdInput
deriving (Read)
input :: Parser Input
input = fileInput <|> stdInput