From 24208496649a02d5f87373052c430ea4a97842c5 Mon Sep 17 00:00:00 2001
From: Vladislav Zavialov <vlad.z.4096@gmail.com>
Date: Fri, 1 Apr 2022 14:32:36 +0300
Subject: HsToken ConDeclGADT con_dcolon

---
 haddock-api/src/Haddock/Convert.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'haddock-api/src/Haddock/Convert.hs')

diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs
index fd5300d2..ceefedf3 100644
--- a/haddock-api/src/Haddock/Convert.hs
+++ b/haddock-api/src/Haddock/Convert.hs
@@ -411,6 +411,7 @@ synifyDataCon use_gadt_syntax dc =
          return $ noLocA $ ConDeclGADT
            { con_g_ext  = noAnn
            , con_names  = [name]
+           , con_dcolon = noHsUniTok
            , con_bndrs  = noLocA outer_bndrs
            , con_mb_cxt = ctx
            , con_g_args = hat
-- 
cgit v1.2.3