summaryrefslogtreecommitdiff
path: root/utils/check-exact/ExactPrint.hs
diff options
context:
space:
mode:
Diffstat (limited to 'utils/check-exact/ExactPrint.hs')
-rw-r--r--utils/check-exact/ExactPrint.hs2
1 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