diff options
Diffstat (limited to 'compiler/GHC/IfaceToCore.hs')
-rw-r--r-- | compiler/GHC/IfaceToCore.hs | 4 |
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 |