diff options
Diffstat (limited to 'src/Haddock/Interface')
| -rw-r--r-- | src/Haddock/Interface/Create.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Haddock/Interface/Create.hs b/src/Haddock/Interface/Create.hs index 1eb2524a..4162b2a2 100644 --- a/src/Haddock/Interface/Create.hs +++ b/src/Haddock/Interface/Create.hs @@ -279,7 +279,11 @@ filterOutInstances = filter (\(L _ d, _, _) -> not (isInstD d)) -- bindings from an 'HsGroup'. declsFromGroup :: HsGroup Name -> [Decl] declsFromGroup group_ = +#if MIN_VERSION_ghc(7,0,2) mkDecls (concat . hs_tyclds) TyClD group_ ++ +#else + mkDecls hs_tyclds TyClD group_ ++ +#endif mkDecls hs_derivds DerivD group_ ++ mkDecls hs_defds DefD group_ ++ mkDecls hs_fords ForD group_ ++ |