diff options
Diffstat (limited to 'compiler/basicTypes/MkId.hs')
-rw-r--r-- | compiler/basicTypes/MkId.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/basicTypes/MkId.hs b/compiler/basicTypes/MkId.hs index 17916cf068..b12da07711 100644 --- a/compiler/basicTypes/MkId.hs +++ b/compiler/basicTypes/MkId.hs @@ -1264,7 +1264,7 @@ proxyHashId `setNeverLevPoly` ty ) where -- proxy# :: forall k (a:k). Proxy# k a - bndrs = mkTemplateKiTyVars [liftedTypeKind] (\ks -> ks) + bndrs = mkTemplateKiTyVars [liftedTypeKind] id [k,t] = mkTyVarTys bndrs ty = mkSpecForAllTys bndrs (mkProxyPrimTy k t) |