diff options
Diffstat (limited to 'rts/sm/Evac.c')
-rw-r--r-- | rts/sm/Evac.c | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/rts/sm/Evac.c b/rts/sm/Evac.c index 0ac9e2623a..4dfbad7e37 100644 --- a/rts/sm/Evac.c +++ b/rts/sm/Evac.c @@ -540,13 +540,6 @@ loop: case WHITEHOLE: goto loop; - case MUT_VAR_CLEAN: - case MUT_VAR_DIRTY: - case MVAR_CLEAN: - case MVAR_DIRTY: - copy(p,info,q,sizeW_fromITBL(INFO_PTR_TO_STRUCT(info)),gen_no); - return; - // For ints and chars of low value, save space by replacing references to // these with closures with references to common, shared ones in the RTS. // @@ -646,6 +639,11 @@ loop: goto loop; } + case MUT_VAR_CLEAN: + case MUT_VAR_DIRTY: + case MVAR_CLEAN: + case MVAR_DIRTY: + case TVAR: case BLOCKING_QUEUE: case WEAK: case PRIM: |