diff options
author | sheaf <sam.derbyshire@gmail.com> | 2021-06-28 17:43:24 +0200 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-06-29 15:36:08 -0400 |
commit | 4e9f58c759f16a3a20c338799a5b83d334c2778d (patch) | |
tree | f7013651d23a13356499ef2d22b54919f8faa6ca /compiler/Language | |
parent | b760c1f743ddb496886f095baa920740b38c9ce0 (diff) | |
download | haskell-4e9f58c759f16a3a20c338799a5b83d334c2778d.tar.gz |
Use HsExpansion for overloaded list patterns
Fixes #14380, #19997
Diffstat (limited to 'compiler/Language')
-rw-r--r-- | compiler/Language/Haskell/Syntax/Pat.hs | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/compiler/Language/Haskell/Syntax/Pat.hs b/compiler/Language/Haskell/Syntax/Pat.hs index 75dc7ddd00..4393ad998a 100644 --- a/compiler/Language/Haskell/Syntax/Pat.hs +++ b/compiler/Language/Haskell/Syntax/Pat.hs @@ -92,9 +92,6 @@ data Pat p ------------ Lists, tuples, arrays --------------- | ListPat (XListPat p) [LPat p] - -- For OverloadedLists a Just (ty,fn) gives - -- overall type of the pattern, and the toList --- function to convert the scrutinee to a list value -- ^ Syntactic List -- @@ -153,9 +150,7 @@ data Pat p -- | - 'GHC.Parser.Annotation.AnnKeywordId' : 'GHC.Parser.Annotation.AnnRarrow' -- For details on above see note [exact print annotations] in GHC.Parser.Annotation - | ViewPat (XViewPat p) -- The overall type of the pattern - -- (= the argument type of the view function) - -- for hsPatType. + | ViewPat (XViewPat p) (LHsExpr p) (LPat p) -- ^ View Pattern |