diff --git a/frame/compat/cblas/src/cblas_xerbla.c b/frame/compat/cblas/src/cblas_xerbla.c index 5d7908068f853a7f10c2195517a0575c5aa1ae35..ebe6bd80096f27870e68535ae5e188c0f095e01c 100644 --- a/frame/compat/cblas/src/cblas_xerbla.c +++ b/frame/compat/cblas/src/cblas_xerbla.c @@ -61,7 +61,7 @@ void cblas_xerbla(f77_int info, const char *rout, const char *form, ...) } } if (info) - fprintf(stderr, "Parameter %d to routine %s was incorrect\n", info, rout); + fprintf(stderr, "Parameter %jd to routine %s was incorrect\n", ( intmax_t )info, rout); vfprintf(stderr, form, argptr); va_end(argptr); if (info && !info)