[commit: ghc] master: AsmCodeGen: Give linear-scan and coloring reg. allocators different cc names (03af399)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/03af3990e65093ff8230ceab67f0c9bcf3ce8684/ghc

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

commit 03af3990e65093ff8230ceab67f0c9bcf3ce8684
Author: Ömer Sinan Ağacan <omeragacan at gmail.com>
Date:   Sat Aug 6 12:55:54 2016 +0000

    AsmCodeGen: Give linear-scan and coloring reg. allocators different cc names


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

03af3990e65093ff8230ceab67f0c9bcf3ce8684
 compiler/nativeGen/AsmCodeGen.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/nativeGen/AsmCodeGen.hs b/compiler/nativeGen/AsmCodeGen.hs
index 46c6fa47..24a9db9 100644
--- a/compiler/nativeGen/AsmCodeGen.hs
+++ b/compiler/nativeGen/AsmCodeGen.hs
@@ -549,7 +549,7 @@ cmmNativeGen dflags this_mod modLoc ncgImpl us fileIds dbgMap cmm count
 
                 -- do the graph coloring register allocation
                 let ((alloced, regAllocStats), usAlloc)
-                        = {-# SCC "RegAlloc" #-}
+                        = {-# SCC "RegAlloc-color" #-}
                           initUs usLive
                           $ Color.regAlloc
                                 dflags
@@ -593,7 +593,7 @@ cmmNativeGen dflags this_mod modLoc ncgImpl us fileIds dbgMap cmm count
                            return (alloced', ra_stats )
 
                 let ((alloced, regAllocStats), usAlloc)
-                        = {-# SCC "RegAlloc" #-}
+                        = {-# SCC "RegAlloc-linear" #-}
                           initUs usLive
                           $ liftM unzip
                           $ mapM reg_alloc withLiveness