diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2015-11-11 11:35:51 +0100 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2015-11-11 11:35:51 +0100 |
| commit | 83a9e9d2c7f0debec9d56e8b3b7cc8a8eb73361e (patch) | |
| tree | 2dc923ba45fbe0abd549b525f1745445af667e7c | |
| parent | 52c963e0b19783c4ca59cd0e8cfe1366dbfa1624 (diff) | |
Eliminate support for deprecated GADT syntax
Follows from GHC D1460.
| -rw-r--r-- | haddock-api/src/Haddock/Convert.hs | 2 |
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 |