Commit 6c235b51 authored by parcs's avatar parcs
Browse files

Compare against pRELUDE_NAME instead of "Prelude"

parent b9127f44
......@@ -1005,7 +1005,7 @@ tcAmpImportViaPrelude :: Name
tcAmpImportViaPrelude name = any importViaPrelude
where
isPrelude :: ImportDecl Name -> Bool
isPrelude = (== "Prelude") . moduleNameString . unLoc . ideclName
isPrelude imp = unLoc (ideclName imp) == pRELUDE_NAME
-- Implicit (Prelude) import?
isImplicit :: ImportDecl Name -> Bool
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment