diff options
| -rw-r--r-- | rts/RetainerProfile.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/RetainerProfile.c b/rts/RetainerProfile.c index 4850b94d21..8d6126af2d 100644 --- a/rts/RetainerProfile.c +++ b/rts/RetainerProfile.c @@ -1843,7 +1843,7 @@ computeRetainerSet( void ) // for retainer profilng. for (weak = weak_ptr_list; weak != NULL; weak = weak->link) // retainRoot((StgClosure *)weak); - retainRoot((StgClosure **)&weak, NULL); + retainRoot(NULL, (StgClosure **)&weak); // Consider roots from the stable ptr table. markStablePtrTable(retainRoot, NULL); |