diff options
| author | Daniel Gröber <dxld@darkboxed.org> | 2019-07-08 15:06:55 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-02-17 11:21:10 -0500 |
| commit | 044a53b83af3ecfb6e17a3c49a75d5b9b78dd11b (patch) | |
| tree | e388b34388b700a47f6d1d8b8bd8d13f62df4d3b /rts/RetainerProfile.c | |
| parent | a04179e74bf18837236fea02040438a2c29c8d56 (diff) | |
| download | haskell-044a53b83af3ecfb6e17a3c49a75d5b9b78dd11b.tar.gz | |
rts: TraverseHeap: Rename traversePushClosure to traversePushRoot
Diffstat (limited to 'rts/RetainerProfile.c')
| -rw-r--r-- | rts/RetainerProfile.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/RetainerProfile.c b/rts/RetainerProfile.c index a836c5bf2a..1e23d8d856 100644 --- a/rts/RetainerProfile.c +++ b/rts/RetainerProfile.c @@ -349,9 +349,9 @@ retainRoot(void *user, StgClosure **tl) c = UNTAG_CLOSURE(*tl); traverseMaybeInitClosureData(c); if (c != &stg_END_TSO_QUEUE_closure && isRetainer(c)) { - traversePushClosure(ts, c, c, (stackData)getRetainerFrom(c)); + traversePushRoot(ts, c, c, (stackData)getRetainerFrom(c)); } else { - traversePushClosure(ts, c, c, (stackData)CCS_SYSTEM); + traversePushRoot(ts, c, c, (stackData)CCS_SYSTEM); } // NOT TRUE: ASSERT(isMember(getRetainerFrom(*tl), retainerSetOf(*tl))); |