diff options
| author | Dr. ERDI Gergo <gergo@erdi.hu> | 2014-12-28 11:51:00 +0800 |
|---|---|---|
| committer | Dr. ERDI Gergo <gergo@erdi.hu> | 2014-12-28 19:37:33 +0800 |
| commit | 0cc0cc8688ddb53db65a73d7d562e9564cfad22b (patch) | |
| tree | 37f3a2b768a1190d518a3141690987dedb6eb710 /ghc | |
| parent | 6c86635df2b0c02a1cff8c2ace7f114c1be699fc (diff) | |
| download | haskell-0cc0cc8688ddb53db65a73d7d562e9564cfad22b.tar.gz | |
Support pattern synonyms in GHCi (fixes #9900)
This involves recognizing lines starting with `"pattern "` as declarations,
keeping non-exported pattern synonyms in `deSugar`, and including
pattern synonyms in the result of `hscDeclsWithLocation`.
Diffstat (limited to 'ghc')
| -rw-r--r-- | ghc/InteractiveUI.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index 7125f6d9b3..9941a60f5b 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -892,6 +892,7 @@ declPrefixes dflags = keywords ++ concat opt_keywords opt_keywords = [ ["foreign " | xopt Opt_ForeignFunctionInterface dflags] , ["deriving " | xopt Opt_StandaloneDeriving dflags] + , ["pattern " | xopt Opt_PatternSynonyms dflags] ] -- | Entry point to execute some haskell code from user. |