diff options
| author | Austin Seipp <austin@well-typed.com> | 2014-02-16 18:49:43 -0600 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-02-17 01:46:04 -0600 |
| commit | c83eabf37b884398d911609e46707df771c3fde9 (patch) | |
| tree | 651a6e98483929ead6fddd53663ceea1a929843f | |
| parent | a365eabd465a1700f479f78ad99fc1a31915e639 (diff) | |
| download | haskell-c83eabf37b884398d911609e46707df771c3fde9.tar.gz | |
Fix check for TLS support in Storage.c
This should have manifested earlier, but for some reason it only seemed
to trigger on Mavericks.
Signed-off-by: Austin Seipp <austin@well-typed.com>
| -rw-r--r-- | rts/sm/Storage.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c index c7126fe32f..df5f4b3e6d 100644 --- a/rts/sm/Storage.c +++ b/rts/sm/Storage.c @@ -237,7 +237,7 @@ void storageAddCapabilities (nat from, nat to) } } -#if defined(THREADED_RTS) && defined(llvm_CC_FLAVOR) +#if defined(THREADED_RTS) && defined(llvm_CC_FLAVOR) && (CC_SUPPORTS_TLS == 0) newThreadLocalKey(&gctKey); #endif @@ -261,7 +261,7 @@ freeStorage (rtsBool free_heap) closeMutex(&sm_mutex); #endif stgFree(nurseries); -#if defined(THREADED_RTS) && defined(llvm_CC_FLAVOR) +#if defined(THREADED_RTS) && defined(llvm_CC_FLAVOR) && (CC_SUPPORTS_TLS == 0) freeThreadLocalKey(&gctKey); #endif freeGcThreads(); |