Apoorv Ingle pushed to branch wip/ani/T27156 at Glasgow Haskell Compiler / GHC

Commits:

1 changed file:

Changes:

  • compiler/GHC/Tc/Gen/Expr.hs
    ... ... @@ -595,7 +595,7 @@ tcExprNoExpand (HsProc x pat cmd) res_ty
    595 595
     -- and wrap (static e) in a call to
    
    596 596
     --    fromStaticPtr :: IsStatic p => StaticPtr a -> p a
    
    597 597
     
    
    598
    -tcExprNoExpand (HsStatic _ expr) res_ty
    
    598
    +tcExprNoExpand (HsStatic free_names expr) res_ty
    
    599 599
       = do  { res_ty          <- expTypeToType res_ty
    
    600 600
             ; (co, (p_ty, expr_ty)) <- matchExpectedAppTy res_ty
    
    601 601
             ; (expr', lie) <- captureConstraints $