diff --git a/ctest/c_sblas2.c b/ctest/c_sblas2.c index e1dbd2c51..3370105b6 100644 --- a/ctest/c_sblas2.c +++ b/ctest/c_sblas2.c @@ -30,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 %s %d %ld %ld from c_cblas2.c\n", transp,trans,*m,*n); + fprintf(stderr,"calling cblas_sgemv COL %s %d %ld %ld %f a %ld x %ld %f y %ld from c_cblas2.c\n", transp,trans,*m,*n,alpha,lda,incx,beta,incy); 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");