[commit: ghc] master: rts: Compile with gcc -Og (d4abd03)

git at git.haskell.org git at git.haskell.org
Mon May 14 02:51:28 UTC 2018


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

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

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

commit d4abd031f6e8c2fa01f8949f60d8a02cca513804
Author: Ben Gamari <bgamari.foss at gmail.com>
Date:   Sun May 13 18:34:48 2018 -0400

    rts: Compile with gcc -Og
    
    This optimisation level is specifically designed to provide the benefits
    of optimisation without the obfuscation that sometimes results.
    
    Test Plan: Validate
    
    Reviewers: simonmar
    
    Reviewed By: simonmar
    
    Subscribers: rwbarton, thomie, carter
    
    Differential Revision: https://phabricator.haskell.org/D4675


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

d4abd031f6e8c2fa01f8949f60d8a02cca513804
 rts/ghc.mk      | 2 +-
 rts/sm/Sanity.c | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/rts/ghc.mk b/rts/ghc.mk
index e96e147..2976b0a 100644
--- a/rts/ghc.mk
+++ b/rts/ghc.mk
@@ -153,7 +153,7 @@ rts_dist_$1_CC_OPTS := $$(GhcRtsCcOpts)
 # The per-way CC_OPTS
 ifneq "$$(findstring debug, $1)" ""
 rts_dist_$1_HC_OPTS += -O0
-rts_dist_$1_CC_OPTS += -fno-omit-frame-pointer -g -O0
+rts_dist_$1_CC_OPTS += -fno-omit-frame-pointer -g -Og
 endif
 
 ifneq "$$(findstring dyn, $1)" ""
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c
index 7a0ad16..23a20b2 100644
--- a/rts/sm/Sanity.c
+++ b/rts/sm/Sanity.c
@@ -481,7 +481,7 @@ checkCompactObjects(bdescr *bd)
     // before the actual closure
 
     for ( ; bd != NULL; bd = bd->link) {
-        StgCompactNFDataBlock *block, *last;
+        StgCompactNFDataBlock *block, *last = NULL;
         StgCompactNFData *str;
         StgWord totalW;
 



More information about the ghc-commits mailing list