diff options
| author | Alina Banerjee <alina@glitchgirl.us> | 2021-08-05 08:08:31 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-08-11 18:15:05 -0400 |
| commit | 100ffe75f509a73f1b26e768237888646f522b6c (patch) | |
| tree | 56702bfdf582572a41b1bfbe9b066039023c0f95 /compiler/GHC/Parser/PostProcess.hs | |
| parent | f5fdace5613914724eb00bcf7547c82f3ad12686 (diff) | |
| download | haskell-100ffe75f509a73f1b26e768237888646f522b6c.tar.gz | |
Modify InlineSpec data constructor (helps fix #18138)
The inl_inline field of the InlinePragma record is modified to store pragma
source text by adding a data constructor of type SourceText. This can help in
tracking the actual text of pragma names.
Add/modify functions, modify type instance for InlineSpec type
Modify parser, lexer to handle InlineSpec constructors containing SourceText
Modify functions with InlineSpec type
Extract pragma source from InlineSpec for SpecSig, InlineSig types
Modify cvtInline function to add SourceText to InlineSpec type
Extract name for InlineSig, SpecSig from pragma, SpectInstSig from source (fixes #18138)
Extract pragma name for SpecPrag pragma, SpecSig signature
Add Haddock annotation for inlinePragmaName function
Add Haddock annotations for using helper functions in hsSigDoc
Remove redundant ppr in pragma name for SpecSig, InlineSig; update comment
Rename test to T18138 for misplaced SPECIALIZE pragma testcase
Diffstat (limited to 'compiler/GHC/Parser/PostProcess.hs')
| -rw-r--r-- | compiler/GHC/Parser/PostProcess.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Parser/PostProcess.hs b/compiler/GHC/Parser/PostProcess.hs index 6b58b70558..4eab0c1486 100644 --- a/compiler/GHC/Parser/PostProcess.hs +++ b/compiler/GHC/Parser/PostProcess.hs @@ -2514,8 +2514,8 @@ mkInlinePragma src (inl, match_info) mb_act Just act -> act Nothing -> -- No phase specified case inl of - NoInline -> NeverActive - _other -> AlwaysActive + NoInline _ -> NeverActive + _other -> AlwaysActive ----------------------------------------------------------------------------- -- utilities for foreign declarations |