diff options
| author | Joachim Breitner <mail@joachim-breitner.de> | 2016-01-23 13:12:10 +0100 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2016-01-23 13:12:10 +0100 |
| commit | f42db1574935b088cfc13cca7c935990002651dc (patch) | |
| tree | 67b2465848dad3a0b76485b42fe8af2b92c04bce /rts/sm/Scav.c | |
| parent | 4e04043d1bb458439d3c3db3ffa9851bff780083 (diff) | |
| download | haskell-f42db1574935b088cfc13cca7c935990002651dc.tar.gz | |
Remove unused IND_PERM
it seems that this closure type has not been in use since 5d52d9, so all
this is dead and untested code. This removes it. Some of the code might
be useful for a counting indirection as described in #10613, so when
implementing that, have a look at what this commit removes.
Test Plan: validate on harbormaster
Reviewers: austin, bgamari, simonmar
Reviewed By: simonmar
Subscribers: thomie
Differential Revision: https://phabricator.haskell.org/D1821
Diffstat (limited to 'rts/sm/Scav.c')
| -rw-r--r-- | rts/sm/Scav.c | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/rts/sm/Scav.c b/rts/sm/Scav.c index a28d84226f..15d2b7b9f4 100644 --- a/rts/sm/Scav.c +++ b/rts/sm/Scav.c @@ -580,7 +580,6 @@ scavenge_block (bdescr *bd) break; } - case IND_PERM: case BLACKHOLE: evacuate(&((StgInd *)p)->indirectee); p += sizeofW(StgInd); @@ -980,12 +979,6 @@ scavenge_mark_stack(void) break; } - case IND_PERM: - // don't need to do anything here: the only possible case - // is that we're in a 1-space compacting collector, with - // no "old" generation. - break; - case IND: case BLACKHOLE: evacuate(&((StgInd *)p)->indirectee); @@ -1295,7 +1288,6 @@ scavenge_one(StgPtr p) case CONSTR_2_0: case WEAK: case PRIM: - case IND_PERM: { StgPtr q, end; |