github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-25 16:02:43 +03:00
Code Issues Projects Releases Wiki Activity

Add HsName to Leaf.

Browse Source
This commit is contained in:
Rob Rix 2015-11-24 10:16:17 -05:00
parent 5c6a2ca1bc
commit eb51a0cd18
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
app/Main.hs
View File

@ -27,6 +27,7 @@ data Leaf =
HsQName HsQName HsQName HsQName
| HsCName HsCName | HsCName HsCName
| HsImportDecl HsImportDecl | HsImportDecl HsImportDecl
| HsName HsName
parseModuleFile :: FilePath -> IO (ParseResult HsModule) parseModuleFile :: FilePath -> IO (ParseResult HsModule)
parseModuleFile file = do parseModuleFile file = do