X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FClosures.h;h=3df208cd09f2f25ee90df5605ae14f010f9818a8;hb=a0f46309637779ccc141ec531e9b128596a5bba0;hp=152213ba5df15fac5caf3d0074a891a09ec6c807;hpb=beb5737b7ee42c4e9373a505e7d957206d69a30e;p=ghc-hetmet.git diff --git a/ghc/includes/Closures.h b/ghc/includes/Closures.h index 152213b..3df208c 100644 --- a/ghc/includes/Closures.h +++ b/ghc/includes/Closures.h @@ -356,7 +356,7 @@ typedef struct { StgHeader header; StgClosure *volatile current_value; StgTVarWaitQueue *volatile first_wait_queue_entry; -#if defined(SMP) +#if defined(THREADED_RTS) StgInt volatile num_updates; #endif } StgTVar; @@ -367,7 +367,7 @@ typedef struct { StgTVar *tvar; StgClosure *expected_value; StgClosure *new_value; -#if defined(SMP) +#if defined(THREADED_RTS) StgInt num_updates; #endif } TRecEntry;