[project @ 2004-10-01 10:08:49 by simonpj]

[ghc-hetmet.git] / ghc / compiler / typecheck / TcType.lhs

diff --git a/ghc/compiler/typecheck/TcType.lhs b/ghc/compiler/typecheck/TcType.lhs
index e1bfedb..a53daf5 100644 (file)
--- a/ghc/compiler/typecheck/TcType.lhs
+++ b/ghc/compiler/typecheck/TcType.lhs
@@ -110,7 +110,7 @@ module TcType (
   tyVarsOfType, tyVarsOfTypes, tyVarsOfPred, tyVarsOfTheta,
 
   pprKind, pprParendKind,
-  pprType, pprParendType,
+  pprType, pprParendType, pprTyThingCategory,
   pprPred, pprTheta, pprThetaArrow, pprClassPred
 
   ) where
@@ -150,7 +150,7 @@ import Type         (       -- Re-exports
 
                          typeKind, repType,
                          pprKind, pprParendKind,
-                         pprType, pprParendType,
+                         pprType, pprParendType, pprTyThingCategory,
                          pprPred, pprTheta, pprThetaArrow, pprClassPred
                        )
 import TyCon           ( TyCon, isUnLiftedTyCon, tyConUnique )