aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlan Zimmerman <alan.zimm@gmail.com>2021-05-13 19:04:33 +0100
committerAlan Zimmerman <alan.zimm@gmail.com>2021-05-13 22:51:20 +0100
commit2fec1b44e0ee7e263286709aa528b4ecb99ac6c2 (patch)
tree80d2900c94d20afbae39c62018b9643cd8a291d4
parentef2304bbff1e30fcd9306b5b211f045d608753c0 (diff)
EPA: match changes from GHC T19834
-rw-r--r--haddock-api/src/Haddock/Convert.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs
index f8d85f88..3a7ef57d 100644
--- a/haddock-api/src/Haddock/Convert.hs
+++ b/haddock-api/src/Haddock/Convert.hs
@@ -209,7 +209,7 @@ synifyTyCon prr _coax tc
, tcdFixity = synifyFixity tc
- , tcdDataDefn = HsDataDefn { dd_ext = noAnn
+ , tcdDataDefn = HsDataDefn { dd_ext = noExtField
, dd_ND = DataType -- arbitrary lie, they are neither
-- algebraic data nor newtype:
, dd_ctxt = Nothing
@@ -300,7 +300,7 @@ synifyTyCon _prr coax tc
cons = rights consRaw
-- "deriving" doesn't affect the signature, no need to specify any.
alg_deriv = []
- defn = HsDataDefn { dd_ext = noAnn
+ defn = HsDataDefn { dd_ext = noExtField
, dd_ND = alg_nd
, dd_ctxt = alg_ctx
, dd_cType = Nothing