Don't import FastString in HsVersions.h

[ghc-hetmet.git] / compiler / rename / RnPat.lhs

diff --git a/compiler/rename/RnPat.lhs b/compiler/rename/RnPat.lhs
index b3564f6..2edb72d 100644 (file)
--- a/compiler/rename/RnPat.lhs
+++ b/compiler/rename/RnPat.lhs
@@ -68,12 +68,11 @@ import Constants    ( mAX_TUPLE_SIZE )
 import Name            ( Name, nameOccName, nameModule_maybe, getOccName, nameSrcSpan )
 import OccName         ( occEnvElts )
 import NameSet
-import UniqFM
+import LazyUniqFM
 import RdrName          ( RdrName, GlobalRdrElt(..), Provenance(..),
                           extendLocalRdrEnv, lookupLocalRdrEnv, hideSomeUnquals,
                           mkRdrUnqual, nameRdrName, gre_name, globalRdrEnvElts, isLocalGRE )
 import LoadIface       ( loadInterfaceForName )
-import UniqFM          ( isNullUFM )
 import UniqSet         ( emptyUniqSet )
 import List            ( nub )
 import Util            ( isSingleton )
@@ -613,6 +612,6 @@ bogusCharError c
   = ptext SLIT("character literal out of range: '\\") <> char c  <> char '\''
 
 badViewPat pat = vcat [ptext SLIT("Illegal view pattern: ") <+> ppr pat,
-                       ptext SLIT("Use -XViewPatterns to enalbe view patterns")]
+                       ptext SLIT("Use -XViewPatterns to enable view patterns")]
 
 \end{code}