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

Commits:

1 changed file:

Changes:

  • compiler/GHC/Core/Unfold.hs
    ... ... @@ -637,6 +637,7 @@ sizeExpr opts !bOMB_OUT_SIZE top_args expr
    637 637
             where
    
    638 638
               is_top_arg (Var v) | v `elem` top_args = Just v
    
    639 639
               is_top_arg (Cast e _) = is_top_arg e
    
    640
    +          is_top_arg (Tick _t e) = is_top_arg e
    
    640 641
               is_top_arg _ = Nothing
    
    641 642
     
    
    642 643
           where