summaryrefslogtreecommitdiff
path: root/compiler/GHC/Tc/Solver/Rewrite.hs
diff options
context:
space:
mode:
authorRichard Eisenberg <rae@richarde.dev>2021-01-04 11:07:00 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-01-09 21:19:45 -0500
commitc8c63dde01686a96af4dabcced78110368efaec3 (patch)
treeb8801ecd61c343c18cf05fee157886e37554b244 /compiler/GHC/Tc/Solver/Rewrite.hs
parentf88fb8c7d803f9d3bf245fa4bd9c50f7a2bd3c5b (diff)
downloadhaskell-c8c63dde01686a96af4dabcced78110368efaec3.tar.gz
Never Anyify during kind inference
See Note [Error on unconstrained meta-variables] in TcMType. Close #17301 Close #17567 Close #17562 Close #15474
Diffstat (limited to 'compiler/GHC/Tc/Solver/Rewrite.hs')
-rw-r--r--compiler/GHC/Tc/Solver/Rewrite.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Tc/Solver/Rewrite.hs b/compiler/GHC/Tc/Solver/Rewrite.hs
index 42a00d73ba..78b32bec15 100644
--- a/compiler/GHC/Tc/Solver/Rewrite.hs
+++ b/compiler/GHC/Tc/Solver/Rewrite.hs
@@ -662,7 +662,7 @@ rewrite_vector ki roles tys
tys
}
where
- (bndrs, inner_ki, any_named_bndrs) = split_pi_tys' ki -- "RAE" fix
+ (bndrs, inner_ki, any_named_bndrs) = split_pi_tys' ki
fvs = tyCoVarsOfType ki
{-# INLINE rewrite_vector #-}