aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2022-03-24 15:06:26 +0000
committerMatthew Pickering <matthewtpickering@gmail.com>2022-03-24 15:06:26 +0000
commit559e41505e81d93939e9afa6aa9793b0a428924f (patch)
tree6112fb3a59557579e87bc9099a362477dc1c4be8
parentd2779a3e659d4e9f7044c346a566e5fe4edbdb9b (diff)
parent746df785f7dfd2fcb54d76b00eb0ee71e2abdc30 (diff)
Merge branch 'wip/opaque_pragma' into 'ghc-head'
Add Haddock support for the OPAQUE pragma See merge request ghc/haddock!2
-rw-r--r--haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
index a218b118..76ae5be3 100644
--- a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
+++ b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs
@@ -238,6 +238,7 @@ classify tok =
ITrequires -> TkKeyword
ITinline_prag {} -> TkPragma
+ ITopaque_prag {} -> TkPragma
ITspec_prag {} -> TkPragma
ITspec_inline_prag {} -> TkPragma
ITsource_prag {} -> TkPragma
@@ -376,6 +377,7 @@ inPragma True _ = True
inPragma False tok =
case tok of
ITinline_prag {} -> True
+ ITopaque_prag {} -> True
ITspec_prag {} -> True
ITspec_inline_prag {} -> True
ITsource_prag {} -> True