[project @ 2000-10-16 13:30:25 by simonmar]
authorsimonmar <unknown>
Mon, 16 Oct 2000 13:30:25 +0000 (13:30 +0000)
committersimonmar <unknown>
Mon, 16 Oct 2000 13:30:25 +0000 (13:30 +0000)
isLocalModule ==> isModuleInThisPackage

ghc/compiler/basicTypes/Name.lhs

index a6c5940..4a8f45f 100644 (file)
@@ -42,7 +42,7 @@ module Name (
 
 import OccName         -- All of it
 import Module          ( Module, moduleName, pprModule, mkVanillaModule, 
-                         isLocalModule )
+                         isModuleInThisPackage )
 import RdrName         ( RdrName, mkRdrQual, mkRdrUnqual, rdrNameOcc, 
                          rdrNameModule )
 import CmdLineOpts     ( opt_Static, opt_PprStyle_NoPrags, 
@@ -342,7 +342,7 @@ isDllName :: Name -> Bool
        -- Does this name refer to something in a different DLL?
 isDllName nm = not opt_Static &&
               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