- Just (False, lies)
- | all isExplicit lies ->
- return ()
- _ ->
- unless implicit_prelude $
- ifDOptM Opt_WarnMissingImportList (addWarn (missingImportListWarn imp_mod_name))
+ Just (False, _) -> return ()
+ _ | implicit_prelude -> return ()
+ | otherwise -> ifDOptM Opt_WarnMissingImportList $
+ addWarn (missingImportListWarn imp_mod_name)