diff options
Diffstat (limited to 'compiler/GHC/Core/Opt/SpecConstr.hs')
-rw-r--r-- | compiler/GHC/Core/Opt/SpecConstr.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Core/Opt/SpecConstr.hs b/compiler/GHC/Core/Opt/SpecConstr.hs index a5579108e6..90f492ffea 100644 --- a/compiler/GHC/Core/Opt/SpecConstr.hs +++ b/compiler/GHC/Core/Opt/SpecConstr.hs @@ -2454,7 +2454,7 @@ argToPat1 _env _in_scope _val_env arg _arg_occ arg_str setStrUnfolding :: Id -> StrictnessMark -> Id -- setStrUnfolding id str = id setStrUnfolding id str - -- | pprTrace "setStrUnfolding" + -- pprTrace "setStrUnfolding" -- (ppr id <+> ppr (isMarkedCbv str) $$ -- ppr (idType id) $$ -- text "boxed:" <> ppr (isBoxedType (idType id)) $$ |