Refs #132. Kill the threads when unload the library.
This commit is contained in:
parent
068861a927
commit
a55821a2ec
|
@ -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))
|
||||
|
|
Loading…
Reference in New Issue