[project @ 2003-12-30 16:29:17 by simonpj]
[ghc-hetmet.git] / ghc / compiler / deSugar / Check.lhs
index d1ae572..4885b13 100644 (file)
@@ -23,7 +23,7 @@ import TysWiredIn
 import PrelNames       ( unboundKey )
 import TyCon            ( tyConDataCons, tupleTyConBoxity, isTupleTyCon )
 import BasicTypes      ( Boxity(..) )
-import SrcLoc          ( noSrcLoc, Located(..), getLoc, unLoc, noLoc )
+import SrcLoc          ( noSrcLoc, Located(..), unLoc, noLoc )
 import UniqSet
 import Util             ( takeList, splitAtList, notNull )
 import Outputable