summaryrefslogtreecommitdiff
path: root/rts/sm/Evac.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/sm/Evac.c')
-rw-r--r--rts/sm/Evac.c12
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: