Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/31c07174b34e999d69870b04cba5780f6d842ada

>---------------------------------------------------------------

commit 31c07174b34e999d69870b04cba5780f6d842ada
Author: Simon Marlow <marlo...@gmail.com>
Date:   Mon Nov 19 13:06:41 2012 +0000

    C backend: put the entry block first

>---------------------------------------------------------------

 compiler/cmm/PprC.hs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/compiler/cmm/PprC.hs b/compiler/cmm/PprC.hs
index ed99855..f323097 100644
--- a/compiler/cmm/PprC.hs
+++ b/compiler/cmm/PprC.hs
@@ -102,7 +102,7 @@ pprTop (CmmProc infos clbl _ graph) =
            rbrace ]
     )
   where
-        blocks = toBlockList graph
+        blocks = toBlockListEntryFirst graph
         (temp_decls, extern_decls) = pprTempAndExternDecls blocks
 
 



_______________________________________________
Cvs-ghc mailing list
Cvs-ghc@haskell.org
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to