aboutsummaryrefslogtreecommitdiff
path: root/haddock-api/src/Haddock/Types.hs
diff options
context:
space:
mode:
Diffstat (limited to 'haddock-api/src/Haddock/Types.hs')
-rw-r--r--haddock-api/src/Haddock/Types.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/haddock-api/src/Haddock/Types.hs b/haddock-api/src/Haddock/Types.hs
index 1a0b2c79..5086d52c 100644
--- a/haddock-api/src/Haddock/Types.hs
+++ b/haddock-api/src/Haddock/Types.hs
@@ -299,6 +299,8 @@ data DocNameI
type instance IdP DocNameI = DocName
+instance XCollectPat DocNameI where
+ collectPatX _ ext = noExtCon ext
instance NamedThing DocName where
getName (Documented name _) = name