X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fiface%2FLoadIface.lhs;h=6835fe620fcc15f64cb1c299a83dd8877de02131;hp=1ebbd39b75b6c389df3b0941a81507eee71455e2;hb=b0c46848af7e431a2898af1a8aa1fbb0d2499137;hpb=35380dd876960a2e88e8743545615040f08b4f27

diff --git a/compiler/iface/LoadIface.lhs b/compiler/iface/LoadIface.lhs
index 1ebbd39..6835fe6 100644
--- a/compiler/iface/LoadIface.lhs
+++ b/compiler/iface/LoadIface.lhs
@@ -677,14 +677,14 @@ pprFixities fixes = ptext SLIT("fixities") <+> pprWithCommas pprFix fixes
 		    pprFix (occ,fix) = ppr fix <+> ppr occ 
 
 pprVectInfo :: IfaceVectInfo -> SDoc
-pprVectInfo (IfaceVectInfo { ifaceVectInfoCCVar        = vars
-                           , ifaceVectInfoCCTyCon      = tycons
-                           , ifaceVectInfoCCTyConReuse = tyconsReuse
+pprVectInfo (IfaceVectInfo { ifaceVectInfoVar        = vars
+                           , ifaceVectInfoTyCon      = tycons
+                           , ifaceVectInfoTyConReuse = tyconsReuse
                            }) = 
   vcat 
-  [ ptext SLIT("CC'ed variables:") <+> hsep (map ppr vars)
-  , ptext SLIT("CC'ed tycons:") <+> hsep (map ppr tycons)
-  , ptext SLIT("CC reused tycons:") <+> hsep (map ppr tyconsReuse)
+  [ ptext SLIT("vectorised variables:") <+> hsep (map ppr vars)
+  , ptext SLIT("vectorised tycons:") <+> hsep (map ppr tycons)
+  , ptext SLIT("vectorised reused tycons:") <+> hsep (map ppr tyconsReuse)
   ]
 
 pprDeprecs NoDeprecs	    = empty