Refs #132. Kill the threads when unload the library.

This commit is contained in:
Zhang Xianyi 2012-08-11 21:33:15 +08:00
parent 068861a927
commit a55821a2ec
3 changed files with 3 additions and 2 deletions

View File

@ -435,7 +435,7 @@ static int blas_thread_server(void *arg){
blas_memory_free(buffer);
pthread_exit(NULL);
//pthread_exit(NULL);
return 0;
}

View File

@ -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;

View File

@ -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))