Add DeclInfo to H.Types

2 files changed, 6 insertions, 1 deletions

diff --git a/src/Haddock/Backends/DevHelp.hs b/src/Haddock/Backends/DevHelp.hs
index 951e422c..76f320b5 100644
--- a/src/Haddock/Backends/DevHelp.hs
+++ b/src/Haddock/Backends/DevHelp.hs
@@ -7,7 +7,7 @@
 module Haddock.Backends.DevHelp (ppDevHelpFile) where
 
 import Haddock.ModuleTree
-import Haddock.Types
+import Haddock.Types hiding (Doc)
 import Haddock.Utils
 
 import Module
diff --git a/src/Haddock/Types.hs b/src/Haddock/Types.hs
index 3951d030..c3f3e8ce 100644
--- a/src/Haddock/Types.hs
+++ b/src/Haddock/Types.hs
@@ -22,6 +22,11 @@ type Decl = LHsDecl Name
 type Doc  = HsDoc Name
 
 
+-- | A declaration that may have documentation, including its subordinates,
+-- which may also have documentation
+type DeclInfo = (Decl, Maybe Doc, [(Name, Maybe Doc)])
+
+
 {-! for DocOption derive: Binary !-}
 data DocOption
   = OptHide           -- ^ This module should not appear in the docs