[commit: ghc] master: Fix build when PROF_SPIN is unset (9c11fdb)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/9c11fdb9b2690c918c234706fb001717c98d3340/ghc

>---------------------------------------------------------------

commit 9c11fdb9b2690c918c234706fb001717c98d3340
Author: Patrick Palka <patrick at parcs.ath.cx>
Date:   Sat Jun 29 19:58:28 2013 -0400

    Fix build when PROF_SPIN is unset
    
    whitehole_spin is only defined when PROF_SPIN is set.


>---------------------------------------------------------------

9c11fdb9b2690c918c234706fb001717c98d3340
 rts/sm/Storage.c |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c
index b575fc3..b6c4c3d 100644
--- a/rts/sm/Storage.c
+++ b/rts/sm/Storage.c
@@ -181,8 +181,10 @@ initStorage (void)
 
 #ifdef THREADED_RTS
   initSpinLock(&gc_alloc_block_sync);
+#ifdef PROF_SPIN
   whitehole_spin = 0;
 #endif
+#endif
 
   N = 0;