Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/08042a51b677b4f5c611e7fdacb8a1c18922fef7 >--------------------------------------------------------------- commit 08042a51b677b4f5c611e7fdacb8a1c18922fef7 Author: Simon Marlow <[email protected]> Date: Wed Aug 29 12:50:46 2012 +0100 fix the name of an SCC >--------------------------------------------------------------- compiler/cmm/CmmPipeline.hs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/compiler/cmm/CmmPipeline.hs b/compiler/cmm/CmmPipeline.hs index da16183..0c075b8 100644 --- a/compiler/cmm/CmmPipeline.hs +++ b/compiler/cmm/CmmPipeline.hs @@ -43,7 +43,7 @@ cmmPipeline hsc_env topSRT prog = tops <- {-# SCC "tops" #-} mapM (cpsTop hsc_env) prog - (topSRT, cmms) <- {-# SCC "toTops" #-} doSRTs topSRT tops + (topSRT, cmms) <- {-# SCC "doSRTs" #-} doSRTs topSRT tops dumpIfSet_dyn dflags Opt_D_dump_cps_cmm "Post CPS Cmm" (ppr cmms) return (topSRT, cmms) _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
