[Git][ghc/ghc][wip/memory-barriers] Fix revertCAFs

[Ben Gamari]

Ben Gamari pushed to branch wip/memory-barriers at Glasgow Haskell Compiler / GHC


Commits:
d2833e62 by Ben Gamari at 2019-06-10T20:07:31Z
Fix revertCAFs

- - - - -


1 changed file:

- rts/sm/GCAux.c


Changes:

=====================================
rts/sm/GCAux.c
=====================================
@@ -123,9 +123,10 @@ revertCAFs( void )
          c = (StgIndStatic *)c->static_link)
     {
         c = (StgIndStatic *)UNTAG_STATIC_LIST_PTR(c);
+        const StgInfoTable *saved_info = c->saved_info;
         c->saved_info = NULL;
         write_barrier();
-        SET_INFO((StgClosure *)c, c->saved_info);
+        SET_INFO((StgClosure *)c, saved_info);
         // could, but not necessary: c->static_link = NULL;
     }
     revertible_caf_list = (StgIndStatic*)END_OF_CAF_LIST;



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/commit/d2833e62a7c5ac3d24cf158d814927b34922aa73

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/commit/d2833e62a7c5ac3d24cf158d814927b34922aa73
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20190610/e1694f5f/attachment.html>