hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove redundant FamilyD case

Browse Source
This commit is contained in:
Jude Taylor 2016-02-04 11:07:51 -08:00
parent 8ef0f52199
commit e417d095bf
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
NotCPP/Declarations.hs
View File

@ -104,9 +104,6 @@ boundNames decl =
TySynD n _ _ -> [(TcClsName, n)] TySynD n _ _ -> [(TcClsName, n)]
ClassD _ n _ _ _ -> [(TcClsName, n)] ClassD _ n _ _ _ -> [(TcClsName, n)]
#if __GLASGOW_HASKELL__ < 800
FamilyD _ n _ _ -> [(TcClsName, n)]
#endif
#if __GLASGOW_HASKELL__ >= 800 #if __GLASGOW_HASKELL__ >= 800
DataD _ n _ _ ctors _ -> DataD _ n _ _ ctors _ ->