rts/sm/Evac.h

   1 /* -----------------------------------------------------------------------------
   2  *
   3  * (c) The GHC Team 1998-2006
   4  *
   5  * Generational garbage collector: evacuation functions
   6  *
   7  * ---------------------------------------------------------------------------*/
   8
   9 // Use a register argument for evacuate, if available.
  10 #if __GNUC__ >= 2
  11 #define REGPARM1 __attribute__((regparm(1)))
  12 #else
  13 #define REGPARM1
  14 #endif
  15
  16 REGPARM1 StgClosure * evacuate (StgClosure *q);
  17
  18 extern lnat thunk_selector_depth;