remove an optimisation that wasn't

[ghc-hetmet.git] / rts / sm / Evac.c

diff --git a/rts/sm/Evac.c b/rts/sm/Evac.c
index 17e756f..9a5f278 100644 (file)
--- a/rts/sm/Evac.c
+++ b/rts/sm/Evac.c
@@ -704,7 +704,6 @@ loop:
 
   case TSO:
       copy(p,info,q,sizeofW(StgTSO),gen);
-      evacuate((StgClosure**)&(((StgTSO*)(*p))->stackobj));
       return;
 
   case STACK: