From 4ec55143f559a2e921c1b464dbf4b3ea8ffc1801 Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Thu, 15 Apr 2021 10:36:40 +0200 Subject: [PATCH] Update c_sblas2.c --- ctest/c_sblas2.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/ctest/c_sblas2.c b/ctest/c_sblas2.c index 22261b9d8..bc994ad2e 100644 --- a/ctest/c_sblas2.c +++ b/ctest/c_sblas2.c @@ -5,7 +5,6 @@ * Modified by T. H. Do, 1/23/98, SGI/CRAY Research. */ #include -#include #include "common.h" #include "cblas_test.h" @@ -31,7 +30,7 @@ void F77_sgemv(blasint *order, char *transp, blasint *m, blasint *n, float *alph free(A); } else if (*order == TEST_COL_MJR) { - fprintf(stderr,"calling cblas_sgemv COL from c_cblas2.c\n"); + fprintf(stderr,"calling cblas_sgemv COL %s %d %ld %ld from c_cblas2.c\n, transp,trans,*m,*n"); cblas_sgemv( CblasColMajor, trans, *m, *n, *alpha, a, *lda, x, *incx, *beta, y, *incy ); fprintf(stderr,"calling cblas_sgemv COL from c_cblas2.c done\n");