[commit: ghc] master: rts: Fix reference to srt_bitmap in ASSERT in RetainerProfile (838cb53)

git at git.haskell.org git at git.haskell.org
Fri Jun 8 00:09:28 UTC 2018


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

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

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

commit 838cb53a80cf468df68975c613fa275338d8d355
Author: Ben Gamari <bgamari.foss at gmail.com>
Date:   Thu Jun 7 13:31:26 2018 -0400

    rts: Fix reference to srt_bitmap in ASSERT in RetainerProfile
    
    Test Plan: Validate
    
    Reviewers: erikd, simonmar
    
    Reviewed By: simonmar
    
    Subscribers: rwbarton, thomie, carter
    
    Differential Revision: https://phabricator.haskell.org/D4798


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

838cb53a80cf468df68975c613fa275338d8d355
 rts/RetainerProfile.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rts/RetainerProfile.c b/rts/RetainerProfile.c
index b7c85e6..6a0af21 100644
--- a/rts/RetainerProfile.c
+++ b/rts/RetainerProfile.c
@@ -535,7 +535,7 @@ push( StgClosure *c, retainer c_child_r, StgClosure **first_child )
 
     // SRT only
     case THUNK_STATIC:
-        ASSERT(get_itbl(c)->srt_bitmap != 0);
+        ASSERT(get_itbl(c)->srt != 0);
     case THUNK_0_1:
     case THUNK_0_2:
     thunk_srt_only:



More information about the ghc-commits mailing list