[commit: ghc] master: PprC: cleanup: don't emit 'FB_' / 'FE_' in via-C (9072f2f)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/9072f2f86d2b3405a45c59960779aeeab281e634/ghc

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

commit 9072f2f86d2b3405a45c59960779aeeab281e634
Author: Sergei Trofimovich <slyfox at gentoo.org>
Date:   Fri Aug 29 00:00:19 2014 +0300

    PprC: cleanup: don't emit 'FB_' / 'FE_' in via-C
    
    No need to emit (now empty) those special markers.
    Markers were needed only in registerised -fvia-C mode.
    
    Signed-off-by: Sergei Trofimovich <slyfox at gentoo.org>


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

9072f2f86d2b3405a45c59960779aeeab281e634
 compiler/cmm/PprC.hs | 7 -------
 includes/Stg.h       | 2 --
 2 files changed, 9 deletions(-)

diff --git a/compiler/cmm/PprC.hs b/compiler/cmm/PprC.hs
index 68b6bf7..58042f7 100644
--- a/compiler/cmm/PprC.hs
+++ b/compiler/cmm/PprC.hs
@@ -99,9 +99,7 @@ pprTop (CmmProc infos clbl _ graph) =
            (if (externallyVisibleCLabel clbl)
                     then mkFN_ else mkIF_) (ppr clbl) <+> lbrace,
            nest 8 temp_decls,
-           nest 8 mkFB_,
            vcat (map pprBBlock blocks),
-           nest 8 mkFE_,
            rbrace ]
     )
   where
@@ -785,11 +783,6 @@ mkJMP_ i = ptext (sLit "JMP_") <> parens i
 mkFN_  i = ptext (sLit "FN_")  <> parens i -- externally visible function
 mkIF_  i = ptext (sLit "IF_")  <> parens i -- locally visible
 
-
-mkFB_, mkFE_ :: SDoc
-mkFB_ = ptext (sLit "FB_") -- function code begin
-mkFE_ = ptext (sLit "FE_") -- function code end
-
 -- from includes/Stg.h
 --
 mkC_,mkW_,mkP_ :: SDoc
diff --git a/includes/Stg.h b/includes/Stg.h
index 1f3e18a..8b3a3fc 100644
--- a/includes/Stg.h
+++ b/includes/Stg.h
@@ -248,8 +248,6 @@ ABI).
    -------------------------------------------------------------------------- */
 
 #define JMP_(cont) return((StgFunPtr)(cont))
-#define FB_
-#define FE_
 
 /* -----------------------------------------------------------------------------
    Other Stg stuff...