From 97c6cb949ffe707865b9c46016f97b441d114e45 Mon Sep 17 00:00:00 2001
From: Vladislav Zavialov <vlad.z.4096@gmail.com>
Date: Thu, 7 Jun 2018 15:45:22 +0300
Subject: Handle -XStarIsType
---
haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs | 1 +
1 file changed, 1 insertion(+)
(limited to 'haddock-api/src/Haddock/Backends/Hyperlinker')
diff --git a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
index e7ecac73..acb2c892 100644
--- a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
+++ b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
@@ -307,6 +307,7 @@ classify tok =
ITminus -> TkGlyph
ITbang -> TkGlyph
ITdot -> TkOperator
+ ITstar {} -> TkOperator
ITtypeApp -> TkGlyph
ITbiglam -> TkGlyph
--
cgit v1.2.3