summaryrefslogtreecommitdiff
path: root/utils
diff options
context:
space:
mode:
authorVladislav Zavialov <vlad.z.4096@gmail.com>2022-04-01 14:33:55 +0300
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-04-08 13:56:27 -0400
commit3415981c36631115bc1d7fb5b51abfcc2932a12f (patch)
tree9546cc5fa07432c16aa60902250a1ad19a6c227c /utils
parent85f4a3c9c2635e71a9ab0b723774ec993fefb93d (diff)
downloadhaskell-3415981c36631115bc1d7fb5b51abfcc2932a12f.tar.gz
HsUniToken for :: in GADT constructors (#19623)
One more step towards the new design of EPA. Updates the haddock submodule.
Diffstat (limited to 'utils')
-rw-r--r--utils/check-exact/ExactPrint.hs2
m---------utils/haddock0
2 files changed, 2 insertions, 0 deletions
diff --git a/utils/check-exact/ExactPrint.hs b/utils/check-exact/ExactPrint.hs
index 3ea74a569c..2451354684 100644
--- a/utils/check-exact/ExactPrint.hs
+++ b/utils/check-exact/ExactPrint.hs
@@ -3230,11 +3230,13 @@ instance ExactPrint (ConDecl GhcPs) where
exact (ConDeclGADT { con_g_ext = an
, con_names = cons
+ , con_dcolon = dcol
, con_bndrs = bndrs
, con_mb_cxt = mcxt, con_g_args = args
, con_res_ty = res_ty, con_doc = doc }) = do
mapM_ markAnnotated doc
mapM_ markAnnotated cons
+ markUniToken dcol
markEpAnn an AnnDcolon
annotationsToComments (epAnnAnns an) [AnnOpenP, AnnCloseP]
-- when has_forall $ markEpAnn an AnnForall
diff --git a/utils/haddock b/utils/haddock
-Subproject d504cd50d8b660c207573864890392f02a48ca5
+Subproject 24208496649a02d5f87373052c430ea4a97842c