diff options
| author | Dr. ERDI Gergo <gergo@erdi.hu> | 2014-12-21 15:01:15 +0800 |
|---|---|---|
| committer | Dr. ERDI Gergo <gergo@erdi.hu> | 2014-12-23 20:21:47 +0800 |
| commit | e6558f2ddb003e241be8ceebfdbdf395d2a4922a (patch) | |
| tree | d9e7f47e2dde31af2fbdb8ab638070e5a9817640 /ghc/InteractiveUI.hs | |
| parent | a8c556dfca3eca5277615cc2bf9d6c8f1f143c9a (diff) | |
| download | haskell-wip/T9900.tar.gz | |
Support pattern synonyms in GHCi (fixes #9900)wip/T9900
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/InteractiveUI.hs')
| -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 d478336c36..b7c50f5aad 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -888,6 +888,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 |