summaryrefslogtreecommitdiff
path: root/rts/sm
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2021-09-24 16:46:56 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-10-12 01:40:29 -0400
commit2e0c13ab50b28d3e2ad5bfeed2b6651096921c9d (patch)
tree80e43098127fd0180f7e9ae99de8959002182619 /rts/sm
parent2c02ea8dc33fe008675b1c0629c0ffb0e8ca4482 (diff)
downloadhaskell-2e0c13ab50b28d3e2ad5bfeed2b6651096921c9d.tar.gz
rts/nonmoving: Enable selector optimisation by default
Diffstat (limited to 'rts/sm')
-rw-r--r--rts/sm/NonMovingMark.c6
1 files changed, 1 insertions, 5 deletions
diff --git a/rts/sm/NonMovingMark.c b/rts/sm/NonMovingMark.c
index 1fc292769d..2fd85dc4f0 100644
--- a/rts/sm/NonMovingMark.c
+++ b/rts/sm/NonMovingMark.c
@@ -1522,11 +1522,7 @@ mark_closure (MarkQueue *queue, const StgClosure *p0, StgClosure **origin)
}
case THUNK_SELECTOR:
- if (RtsFlags.GcFlags.nonmovingSelectorOpt) {
- nonmoving_eval_thunk_selector(queue, (StgSelector*)p, origin);
- } else {
- PUSH_FIELD((StgSelector *) p, selectee);
- }
+ nonmoving_eval_thunk_selector(queue, (StgSelector*)p, origin);
break;
case AP_STACK: {