aboutsummaryrefslogtreecommitdiff
path: root/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
diff options
context:
space:
mode:
authorMatthías Páll Gissurarson <mpg@mpg.is>2020-06-19 17:11:25 +0200
committerMatthías Páll Gissurarson <mpg@mpg.is>2020-06-26 19:07:03 +0200
commit54ed6ae2556dc787916e2d56ce0e99808af14e61 (patch)
treeae573c3b51cd97067bd8cf8ae88e716050861179 /haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
parentcaae45aa98a7ca5182bb52aeafc22fd91e4ceb59 (diff)
Adapt Haddock for QualifiedDo
Diffstat (limited to 'haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs')
-rw-r--r--haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
index 6ced4924..f8267f21 100644
--- a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
+++ b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
@@ -180,7 +180,7 @@ classify tok =
ITdata -> TkKeyword
ITdefault -> TkKeyword
ITderiving -> TkKeyword
- ITdo -> TkKeyword
+ ITdo {} -> TkKeyword
ITelse -> TkKeyword
IThiding -> TkKeyword
ITforeign -> TkKeyword
@@ -213,7 +213,7 @@ classify tok =
ITcapiconv -> TkKeyword
ITprimcallconv -> TkKeyword
ITjavascriptcallconv -> TkKeyword
- ITmdo -> TkKeyword
+ ITmdo {} -> TkKeyword
ITfamily -> TkKeyword
ITrole -> TkKeyword
ITgroup -> TkKeyword