Merge branches 'wip/gc/sync-without-capability', 'wip/gc/factor-out-bitmap-walking...
authorBen Gamari <ben@smart-cactus.org>
Fri, 22 Feb 2019 01:00:02 +0000 (20:00 -0500)
committerBen Gamari <ben@smart-cactus.org>
Fri, 22 Feb 2019 01:00:02 +0000 (20:00 -0500)
1  2  3  4  5  6 
rts/sm/GC.c

diff --cc rts/sm/GC.c
@@@@@@@ -1836,21 -1836,21 -1836,21 -1836,16 -1836,21 -1841,21 +1841,16 @@@@@@@ resize_nursery (void
      
      #if defined(DEBUG)
      
--- --static void gcCAFs(void)
+++ ++void gcCAFs(void)
      {
--- --    StgIndStatic *p, *prev;
--- - 
--- -     const StgInfoTable *info;
--- -     uint32_t i;
--- - 
--- -     i = 0;
--- -     p = debug_caf_list;
--- -     prev = NULL;
+++ ++    uint32_t i = 0;
+++ ++    StgIndStatic *prev = NULL;
      
     -    const StgInfoTable *info;
     -    uint32_t i;
     -
     -    i = 0;
     -    p = debug_caf_list;
     -    prev = NULL;
     -
--- --    for (p = debug_caf_list; p != (StgIndStatic*)END_OF_CAF_LIST;
--- --         p = (StgIndStatic*)p->saved_info) {
--- --
--- --        info = get_itbl((StgClosure*)p);
+++ ++    for (StgIndStatic *p = debug_caf_list;
+++ ++         p != (StgIndStatic*) END_OF_CAF_LIST;
+++ ++         p = (StgIndStatic*) p->saved_info)
+++ ++    {
+++ ++        const StgInfoTable *info = get_itbl((StgClosure*)p);
              ASSERT(info->type == IND_STATIC);
      
              // See Note [STATIC_LINK fields] in Storage.h