aboutsummaryrefslogtreecommitdiff
path: root/haddock-api/src/Haddock
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2015-11-11 11:35:51 +0100
committerBen Gamari <ben@smart-cactus.org>2015-11-11 11:35:51 +0100
commit83a9e9d2c7f0debec9d56e8b3b7cc8a8eb73361e (patch)
tree2dc923ba45fbe0abd549b525f1745445af667e7c /haddock-api/src/Haddock
parent52c963e0b19783c4ca59cd0e8cfe1366dbfa1624 (diff)
Eliminate support for deprecated GADT syntax
Follows from GHC D1460.
Diffstat (limited to 'haddock-api/src/Haddock')
-rw-r--r--haddock-api/src/Haddock/Convert.hs2
1 files changed, 0 insertions, 2 deletions
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