Refs #132. Kill the threads when unload the library.
This commit is contained in:
@@ -435,7 +435,7 @@ static int blas_thread_server(void *arg){
|
||||
|
||||
blas_memory_free(buffer);
|
||||
|
||||
pthread_exit(NULL);
|
||||
//pthread_exit(NULL);
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
@@ -433,7 +433,7 @@ int exec_blas(BLASLONG num, blas_queue_t *queue){
|
||||
/* Shutdown procedure, but user don't have to call this routine. The */
|
||||
/* kernel automatically kill threads. */
|
||||
|
||||
int blas_thread_shutdown_(void){
|
||||
int BLASFUNC(blas_thread_shutdown)(void){
|
||||
|
||||
int i;
|
||||
|
||||
|
||||
@@ -1289,6 +1289,7 @@ void DESTRUCTOR gotoblas_quit(void) {
|
||||
moncontrol (1);
|
||||
#endif
|
||||
|
||||
blas_shutdown();
|
||||
}
|
||||
|
||||
#if (defined(C_PGI) || (!defined(C_SUN) && defined(F_INTERFACE_SUN))) && (defined(ARCH_X86) || defined(ARCH_X86_64))
|
||||
|
||||
Reference in New Issue
Block a user