diff options
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 -> |