aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/Interface/Create.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Haddock/Interface/Create.hs')
-rw-r--r--src/Haddock/Interface/Create.hs4
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_ ++