Reimplemented BLIS initialization/finalization.

Details:
- Rewrote bli_init() and bli_finalize() with OpenMP critical sections
  for thread-safety. Also added lots of explanatory comments.
- Renamed bli_init_safe() and bli_finalize_safe() with the _auto()
  suffix, and reimplemented for simplicity. Updated all invocations
  in BLAS compatibility layer to use _auto() suffix.
This commit is contained in:
Field G. Van Zee
2014-07-17 13:25:56 -05:00
parent 36358948ea
commit a41e68e09e
29 changed files with 177 additions and 91 deletions

View File

@@ -62,7 +62,7 @@ void PASTEF77(ch,blasname)( \
err_t init_result; \
\
/* Initialize BLIS (if it is not already initialized). */ \
bli_init_safe( &init_result ); \
bli_init_auto( &init_result ); \
\
/* Perform BLAS parameter checking. */ \
PASTEBLACHK(blasname)( MKSTR(ch), \
@@ -104,7 +104,7 @@ void PASTEF77(ch,blasname)( \
c, rs_c, cs_c ); \
\
/* Finalize BLIS (if it was initialized above). */ \
bli_finalize_safe( init_result ); \
bli_finalize_auto( init_result ); \
}
#ifdef BLIS_ENABLE_BLAS2BLIS