diff options
| author | Jakob Bruenker <jakob.bruenker@gmail.com> | 2022-03-21 00:14:25 +0100 |
|---|---|---|
| committer | Jakob Bruenker <jakob.bruenker@gmail.com> | 2022-03-31 17:45:37 +0200 |
| commit | a9c0c69b42657d39f26ab822241900ba0f308dc3 (patch) | |
| tree | fd59a5e49146ee436e04137b313d8e4178c2bed0 /compiler/GHC/Iface/Ext/Ast.hs | |
| parent | dda46e2da13268c239db3290720b014cef00c01d (diff) | |
| download | haskell-wip/T20768.tar.gz | |
Implement \cases (Proposal 302)wip/T20768
This commit implements proposal 302: \cases - Multi-way lambda
expressions.
This adds a new expression heralded by \cases, which works exactly like
\case, but can match multiple apats instead of a single pat.
Updates submodule haddock to support the ITlcases token.
Closes #20768
Diffstat (limited to 'compiler/GHC/Iface/Ext/Ast.hs')
| -rw-r--r-- | compiler/GHC/Iface/Ext/Ast.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Iface/Ext/Ast.hs b/compiler/GHC/Iface/Ext/Ast.hs index db93777a7d..3e373f5bb5 100644 --- a/compiler/GHC/Iface/Ext/Ast.hs +++ b/compiler/GHC/Iface/Ext/Ast.hs @@ -1094,7 +1094,7 @@ instance HiePass p => ToHie (LocatedA (HsExpr (GhcPass p))) where HsLam _ mg -> [ toHie mg ] - HsLamCase _ mg -> + HsLamCase _ _ mg -> [ toHie mg ] HsApp _ a b -> @@ -1415,7 +1415,7 @@ instance HiePass p => ToHie (LocatedA (HsCmd (GhcPass p))) where [ toHie expr , toHie alts ] - HsCmdLamCase _ alts -> + HsCmdLamCase _ _ alts -> [ toHie alts ] HsCmdIf _ _ a b c -> |