diff options
Diffstat (limited to 'compiler/GHC/Stg/InferTags/Rewrite.hs')
-rw-r--r-- | compiler/GHC/Stg/InferTags/Rewrite.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Stg/InferTags/Rewrite.hs b/compiler/GHC/Stg/InferTags/Rewrite.hs index 338d713a7a..1d2d280f2c 100644 --- a/compiler/GHC/Stg/InferTags/Rewrite.hs +++ b/compiler/GHC/Stg/InferTags/Rewrite.hs @@ -420,7 +420,7 @@ rewriteApp True (StgApp f []) = do else f return $! StgApp f' [] rewriteApp _ (StgApp f args) - -- | pprTrace "rewriteAppOther" (ppr f <+> ppr args) False + -- pprTrace "rewriteAppOther" (ppr f <+> ppr args) False -- = undefined | Just marks <- idCbvMarks_maybe f , relevant_marks <- dropWhileEndLE (not . isMarkedCbv) marks |