X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FsimplStg%2FStgVarInfo.lhs;h=1947e9593a17255f1af8a59163a6f469051bccde;hb=e7498a3ee1d0484d02a9e86633cc179c76ebf36e;hp=097251a2cbfb0a9837daa9d640ae7b5e35363fb4;hpb=f9120c200bcf613b58d742802172fb4c08171f0d;p=ghc-hetmet.git diff --git a/ghc/compiler/simplStg/StgVarInfo.lhs b/ghc/compiler/simplStg/StgVarInfo.lhs index 097251a..1947e95 100644 --- a/ghc/compiler/simplStg/StgVarInfo.lhs +++ b/ghc/compiler/simplStg/StgVarInfo.lhs @@ -11,7 +11,7 @@ let-no-escapes. module StgVarInfo ( setStgVarInfo ) where -import Ubiq{-uitous-} +IMP_Ubiq(){-uitous-} import StgSyn @@ -25,7 +25,7 @@ import Id ( emptyIdSet, mkIdSet, minusIdSet, GenId{-instance Eq-} ) import Maybes ( maybeToBool ) -import Outputable ( isLocallyDefined ) +import Name ( isLocallyDefined ) import PprStyle ( PprStyle(..) ) import PprType ( GenType{-instance Outputable-} ) import Util ( panic, pprPanic, assertPanic )