diff options
Diffstat (limited to 'compiler/hieFile/HieAst.hs')
| -rw-r--r-- | compiler/hieFile/HieAst.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/hieFile/HieAst.hs b/compiler/hieFile/HieAst.hs index 9752403054..2b112153bd 100644 --- a/compiler/hieFile/HieAst.hs +++ b/compiler/hieFile/HieAst.hs @@ -1386,7 +1386,7 @@ instance ToHie (LHsType GhcRn) where instance ToHie (TScoped (LHsType GhcRn)) where toHie (TS tsc (L span t)) = concatM $ makeNode t span : case t of - HsForAllTy _ bndrs body -> + HsForAllTy _ _ bndrs body -> [ toHie $ tvScopes tsc (mkScope $ getLoc body) bndrs , toHie body ] |