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 5a26395..2edb72d 100644 (file)
--- a/compiler/rename/RnPat.lhs
+++ b/compiler/rename/RnPat.lhs
@@ -68,7 +68,7 @@ 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 )
@@ -612,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}