Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC

Commits:

1 changed file:

Changes:

  • compiler/GHC/Tc/Utils/Unify.hs
    ... ... @@ -4240,6 +4240,8 @@ checkTyEqRhs flags rhs
    4240 4240
       = recurseIntoFamTyConApp flags tc tys
    
    4241 4241
       | otherwise
    
    4242 4242
       = check_ty_eq_rhs flags rhs
    
    4243
    +-- Prevent dictionary-passing when checkTyEqRhs is used in TcM in other modules:
    
    4244
    +{-# SPECIALIZE checkTyEqRhs :: TyEqFlags TcM a -> TcType -> TcM (PuResult a Reduction) #-}
    
    4243 4245
     
    
    4244 4246
     {- Note [Special case for top-level of Given equality]
    
    4245 4247
     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~