Convert op names to uppercase before calling xerbla_().

Details:
- Defined a new function, bli_string_mkupper(), that calls toupper() on
  every non-NULL character in a string.
- Call bli_string_mkupper() prior to calling xerbla_() in the level-2/-3
  BLAS _check() macros. This prevents the BLAS testsuite from complaining
  that the operation name (e.g. "dgemm") does not match the expected
  value (e.g. "DGEMM"). Thanks to Dave Love for reporting this issue.

frame/compat/check/bla_gemm_check.h

@@ -76,6 +76,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_gemv_check.h

@@ -61,6 +61,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_ger_check.h

@@ -54,6 +54,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_hemm_check.h

@@ -69,6 +69,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_hemv_check.h

@@ -58,6 +58,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_her2_check.h

@@ -58,6 +58,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_her2k_check.h

@@ -69,6 +69,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_her_check.h

@@ -56,6 +56,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_herk_check.h

@@ -67,6 +67,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_syr2k_check.h

@@ -70,6 +70,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_syrk_check.h

@@ -68,6 +68,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_trmm_check.h

@@ -78,6 +78,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \

frame/compat/check/bla_trmv_check.h

@@ -67,6 +67,8 @@
 		char func_str[ BLIS_MAX_BLAS_FUNC_STR_LENGTH ]; \
 \
 		sprintf( func_str, "%s%-5s", dt_str, op_str ); \
+\
+		bli_string_mkupper( func_str ); \
 \
 		PASTEF770(xerbla)( func_str, &info, (ftnlen)6 ); \
 \