From 7e6271f8ef282a80e56c5ae6e58a33d5d255a6f5 Mon Sep 17 00:00:00 2001
From: Isaac Dupree <id@isaac.cedarswampstudios.org>
Date: Tue, 18 Aug 2009 20:24:38 +0000
Subject: Fix GHC 6.11 build in Haddock.Convert

---
 src/Haddock/Convert.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/Haddock')

diff --git a/src/Haddock/Convert.hs b/src/Haddock/Convert.hs
index 958667a0..b5fc2b9d 100644
--- a/src/Haddock/Convert.hs
+++ b/src/Haddock/Convert.hs
@@ -186,6 +186,9 @@ synifyDataCon use_gadt_syntax dc = noLoc $
  -- finally we get synifyDataCon's result!
  in ConDecl name Implicit{-we don't know nor care-}
       qvars ctx tys res_ty Nothing
+#if __GLASGOW_HASKELL__ >= 611
+      False --we don't want any "deprecated GADT syntax" warnings!
+#endif
 
 synifyName :: NamedThing n => n -> Located Name
 synifyName n = noLoc (getName n)
-- 
cgit v1.2.3