Define a type for declarations.

src/Renderer/TOC.hs

@@ -5,6 +5,8 @@ module Renderer.TOC
 , JSONSummary(..)
 , Summarizable(..)
 , isErrorSummary
+, Declaration(..)
+, DeclarationType(..)
 , Entry(..)
 , tableOfContentsBy
 ) where
@@ -61,6 +63,14 @@ data Summarizable
     }
   deriving (Eq, Show)
 
+-- | A declaration’s identifier and type.
+data Declaration = Declaration { declarationIdentifier :: Text, declarationType :: DeclarationType }
+  deriving (Eq, Show)
+
+-- | The type of a declaration.
+data DeclarationType = Method | Function | Class
+  deriving (Eq, Show)
+
 -- | An entry in a table of contents.
 data Entry a
   = Unchanged a       -- ^ An entry for an unchanged portion of a diff (i.e. a diff node not containing any patches).