Browse Source
Move TLS key deletion to openblas_quit
fixes #1954 (as suggested by thrasibule in that issue)tags/v0.3.6^2
Martin Kroeker
GitHub
6 years ago
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 8 additions and 5 deletions
Unified View
Diff Options
-
+8 -5driver/others/memory.c
+ 8
- 5
driver/others/memory.c
View File
| @@ -1073,11 +1073,6 @@ static volatile int memory_initialized = 0; | |||||
| } | } | ||||
| free(table); | free(table); | ||||
| } | } | ||||
| #if defined(OS_WINDOWS) | |||||
| TlsFree(local_storage_key); | |||||
| #else | |||||
| pthread_key_delete(local_storage_key); | |||||
| #endif | |||||
| } | } | ||||
| static void blas_memory_init(){ | static void blas_memory_init(){ | ||||
| @@ -1491,6 +1486,14 @@ void DESTRUCTOR gotoblas_quit(void) { | |||||
| blas_shutdown(); | blas_shutdown(); | ||||
| #if defined(SMP) | |||||
| #if defined(OS_WINDOWS) | |||||
| TlsFree(local_storage_key); | |||||
| #else | |||||
| pthread_key_delete(local_storage_key); | |||||
| #endif | |||||
| #endif | |||||
| #ifdef PROFILE | #ifdef PROFILE | ||||
| moncontrol (0); | moncontrol (0); | ||||
| #endif | #endif | ||||