Commit 370e75dd authored by simonmar's avatar simonmar
Browse files

[project @ 2000-10-16 13:30:25 by simonmar]

isLocalModule ==> isModuleInThisPackage
parent 633b2dbd
...@@ -42,7 +42,7 @@ module Name ( ...@@ -42,7 +42,7 @@ module Name (
import OccName -- All of it import OccName -- All of it
import Module ( Module, moduleName, pprModule, mkVanillaModule, import Module ( Module, moduleName, pprModule, mkVanillaModule,
isLocalModule ) isModuleInThisPackage )
import RdrName ( RdrName, mkRdrQual, mkRdrUnqual, rdrNameOcc, import RdrName ( RdrName, mkRdrQual, mkRdrUnqual, rdrNameOcc,
rdrNameModule ) rdrNameModule )
import CmdLineOpts ( opt_Static, opt_PprStyle_NoPrags, import CmdLineOpts ( opt_Static, opt_PprStyle_NoPrags,
...@@ -342,7 +342,7 @@ isDllName :: Name -> Bool ...@@ -342,7 +342,7 @@ isDllName :: Name -> Bool
-- Does this name refer to something in a different DLL? -- Does this name refer to something in a different DLL?
isDllName nm = not opt_Static && isDllName nm = not opt_Static &&
not (isLocallyDefinedName nm) && -- isLocallyDefinedName test needed 'cos not (isLocallyDefinedName nm) && -- isLocallyDefinedName test needed 'cos
not (isLocalModule (nameModule nm)) -- nameModule won't work on local names not (isModuleInThisPackage (nameModule nm)) -- nameModule won't work on local names
......
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