X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypes%2FUsage.lhs;h=e13a6195bb407f65f7181e73f1da648ab85b3fde;hb=5eb1c77c795f92ed0f4c8023847e9d4be1a4fd0d;hp=c5e26d2cbc5978411e114c22ccd303dce4f69749;hpb=e7498a3ee1d0484d02a9e86633cc179c76ebf36e;p=ghc-hetmet.git diff --git a/ghc/compiler/types/Usage.lhs b/ghc/compiler/types/Usage.lhs index c5e26d2..e13a619 100644 --- a/ghc/compiler/types/Usage.lhs +++ b/ghc/compiler/types/Usage.lhs @@ -7,7 +7,7 @@ #include "HsVersions.h" module Usage ( - GenUsage(..), Usage(..), UVar(..), UVarEnv(..), + GenUsage(..), SYN_IE(Usage), SYN_IE(UVar), SYN_IE(UVarEnv), usageOmega, pprUVar, duffUsage, nullUVarEnv, mkUVarEnv, addOneToUVarEnv, growUVarEnvList, isNullUVarEnv, lookupUVarEnv, @@ -16,7 +16,7 @@ module Usage ( IMP_Ubiq(){-uitous-} -import Pretty ( Pretty(..), PrettyRep, ppPStr, ppBeside ) +import Pretty ( SYN_IE(Pretty), PrettyRep, ppPStr, ppBeside ) import UniqFM ( emptyUFM, listToUFM, addToUFM, lookupUFM, plusUFM, sizeUFM, UniqFM )