[commit: ghc] master: Revert "rts: Compile with gcc -Og" (1e27209)

git at git.haskell.org git at git.haskell.org
Mon May 14 12:50:30 UTC 2018


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

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

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

commit 1e2720949a406f45b807fad69e7409777607f275
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Mon May 14 08:48:42 2018 -0400

    Revert "rts: Compile with gcc -Og"
    
    This reverts commit d4abd031f6e8c2fa01f8949f60d8a02cca513804.


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

1e2720949a406f45b807fad69e7409777607f275
 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 2976b0a..e96e147 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 -Og
+rts_dist_$1_CC_OPTS += -fno-omit-frame-pointer -g -O0
 endif
 
 ifneq "$$(findstring dyn, $1)" ""
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c
index 23a20b2..7a0ad16 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 = NULL;
+        StgCompactNFDataBlock *block, *last;
         StgCompactNFData *str;
         StgWord totalW;
 



More information about the ghc-commits mailing list