From 83a9e9d2c7f0debec9d56e8b3b7cc8a8eb73361e Mon Sep 17 00:00:00 2001
From: Ben Gamari <ben@smart-cactus.org>
Date: Wed, 11 Nov 2015 11:35:51 +0100
Subject: Eliminate support for deprecated GADT syntax

Follows from GHC D1460.
---
 haddock-api/src/Haddock/Convert.hs | 2 --
 1 file changed, 2 deletions(-)

(limited to 'haddock-api/src/Haddock')

diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs
index 9cc9e115..a61e3696 100644
--- a/haddock-api/src/Haddock/Convert.hs
+++ b/haddock-api/src/Haddock/Convert.hs
@@ -307,8 +307,6 @@ synifyDataCon use_gadt_syntax dc =
  in hs_arg_tys >>=
       \hat -> return . noLoc $ ConDecl [name] Implicit -- we don't know nor care
                 qvars ctx hat hs_res_ty Nothing
-                -- we don't want any "deprecated GADT syntax" warnings!
-                False
 
 synifyName :: NamedThing n => n -> Located Name
 synifyName = noLoc . getName
-- 
cgit v1.2.3