From: simonmar <unknown>
Date: Tue, 26 Jul 2005 12:15:54 +0000 (+0000)
Subject: [project @ 2005-07-26 12:15:54 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~309
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=e0de5ea44fd761668efe5c53d967e6fb3241c741;p=ghc-hetmet.git

[project @ 2005-07-26 12:15:54 by simonmar]
printing C: use the quick printForC rather than the slow (but
prettier) printForUser.  This has been a ToDo for a while.
---

diff --git a/ghc/compiler/cmm/PprC.hs b/ghc/compiler/cmm/PprC.hs
index 9c494fe..8bcfd0c 100644
--- a/ghc/compiler/cmm/PprC.hs
+++ b/ghc/compiler/cmm/PprC.hs
@@ -69,8 +69,7 @@ pprCs dflags cmms
 
 writeCs :: DynFlags -> Handle -> [Cmm] -> IO ()
 writeCs dflags handle cmms 
-  = printForUser handle alwaysQualify (pprCs dflags cmms)
- 	-- ToDo: should be printForC
+  = printForC handle (pprCs dflags cmms)
 
 -- --------------------------------------------------------------------------
 -- Now do some real work