X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FEvac.h;h=e6ef02cfcc97528b07d9b3904710b769a33ff662;hb=988bfabb5e8a3a743d03e57f2f25ca1008c6e6f1;hp=893f79e37e0c2bbb86a99ce630df1677a808c448;hpb=34d0fee7fa3f29069c9a84df404182726f61b367;p=ghc-hetmet.git diff --git a/rts/sm/Evac.h b/rts/sm/Evac.h index 893f79e..e6ef02c 100644 --- a/rts/sm/Evac.h +++ b/rts/sm/Evac.h @@ -1,6 +1,6 @@ /* ----------------------------------------------------------------------------- * - * (c) The GHC Team 1998-2006 + * (c) The GHC Team 1998-2008 * * Generational garbage collector: evacuation functions * @@ -31,7 +31,3 @@ REGPARM1 void evacuate (StgClosure **p); REGPARM1 void evacuate1 (StgClosure **p); extern lnat thunk_selector_depth; - -#if defined(PROF_SPIN) && defined(THREADED_RTS) -StgWord64 whitehole_spin; -#endif