From 08f59783c58ec0521fb41e8fd6e1dcd610e51af1 Mon Sep 17 00:00:00 2001 From: sof Date: Mon, 15 Feb 1999 14:45:01 +0000 Subject: [PATCH] [project @ 1999-02-15 14:45:01 by sof] findAndReadIface: use decoded module name --- ghc/compiler/rename/RnIfaces.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/rename/RnIfaces.lhs b/ghc/compiler/rename/RnIfaces.lhs index 5baa12f..5b3c299 100644 --- a/ghc/compiler/rename/RnIfaces.lhs +++ b/ghc/compiler/rename/RnIfaces.lhs @@ -44,7 +44,7 @@ import FiniteMap ( FiniteMap, sizeFM, emptyFM, delFromFM, fmToList ) import Name ( Name {-instance NamedThing-}, - nameModule, moduleString, pprModule, isLocallyDefined, + nameModule, moduleUserString, pprModule, isLocallyDefined, isWiredInName, maybeWiredInTyConName, pprModule, maybeWiredInIdName, nameUnique, NamedThing(..) ) @@ -1041,7 +1041,7 @@ findAndReadIface doc_str mod_name -- one for 'normal' ones, the other for .hi-boot files, -- hence the need to signal which kind we're interested. getModuleHiMap from_hi_boot `thenRn` \ himap -> - case (lookupFM himap (moduleString mod_name)) of + case (lookupFM himap (moduleUserString mod_name)) of -- Found the file Just fpath -> readIface fpath -- Hack alert! When compiling PrelBase we have to load the -- 1.7.10.4