diff options
| author | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 21:33:58 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 21:33:58 +0000 |
| commit | ea661992b7397eddee145b80a449c40ab565fd12 (patch) | |
| tree | 24907043f480133a7fac4c28e4b50de1b90b1624 /rts/sm/Evac.h | |
| parent | 29b3b0bdb952e9141e7b49753d8a72c8d31041ae (diff) | |
| download | haskell-ea661992b7397eddee145b80a449c40ab565fd12.tar.gz | |
Add profiling of spinlocks
Diffstat (limited to 'rts/sm/Evac.h')
| -rw-r--r-- | rts/sm/Evac.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/rts/sm/Evac.h b/rts/sm/Evac.h index 33ee4c5195..1bce74a336 100644 --- a/rts/sm/Evac.h +++ b/rts/sm/Evac.h @@ -31,3 +31,7 @@ REGPARM1 void evacuate (StgClosure **p); REGPARM1 void evacuate0 (StgClosure **p); extern lnat thunk_selector_depth; + +#if defined(PROF_SPIN) && defined(THREADED_RTS) +StgWord64 whitehole_spin; +#endif |