summaryrefslogtreecommitdiff
path: root/compiler/GHC/IfaceToCore.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/IfaceToCore.hs')
-rw-r--r--compiler/GHC/IfaceToCore.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/IfaceToCore.hs b/compiler/GHC/IfaceToCore.hs
index 700d830c9d..1af97d1b6b 100644
--- a/compiler/GHC/IfaceToCore.hs
+++ b/compiler/GHC/IfaceToCore.hs
@@ -1474,8 +1474,8 @@ tcIdInfo ignore_prags toplvl name ty info = do
| otherwise = filter need_prag items
need_prag :: IfaceInfoItem -> Bool
- -- compulsory unfoldings are really compulsory.
- -- See wrinkle in Note [Wiring in unsafeCoerce#] in Desugar
+ -- Always read in compulsory unfoldings
+ -- See Note [Always expose compulsory unfoldings] in GHC.Iface.Tidy
need_prag (HsUnfold _ (IfCompulsory {})) = True
need_prag _ = False