X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Fcompiler%2FabsCSyn%2FCLabel.lhs;h=1ecd2e10365c7538f1bba08712da5c130e0391fb;hb=f7ecf7234c224489be8a5e63fced903b655d92ee;hp=284d6e765cd62fd4e5ac2e928d44cc47b5e1be05;hpb=26741ec416bae2c502ef00a2ba0e79050a32cb67;p=ghc-hetmet.git

diff --git a/ghc/compiler/absCSyn/CLabel.lhs b/ghc/compiler/absCSyn/CLabel.lhs
index 284d6e7..1ecd2e1 100644
--- a/ghc/compiler/absCSyn/CLabel.lhs
+++ b/ghc/compiler/absCSyn/CLabel.lhs
@@ -66,11 +66,11 @@ import Id		( externallyVisibleId, cmpId_withSpecDataCon,
 import Maybes		( maybeToBool )
 import PprStyle		( PprStyle(..) )
 import PprType		( showTyCon, GenType{-instance Outputable-} )
-import Pretty		( prettyToUn, ppPStr{-ToDo:rm-} )
+import Pretty		( prettyToUn{-, ppPStr ToDo:rm-} )
 import TyCon		( TyCon{-instance Eq-} )
 import Unique		( showUnique, pprUnique, Unique{-instance Eq-} )
 import Unpretty		-- NOTE!! ********************
-import Util		( assertPanic, pprTrace{-ToDo:rm-} )
+import Util		( assertPanic{-, pprTraceToDo:rm-} )
 \end{code}
 
 things we want to find out: