diff --git a/driver/others/xerbla.c b/driver/others/xerbla.c index 7427b51c4..290f2833c 100644 --- a/driver/others/xerbla.c +++ b/driver/others/xerbla.c @@ -46,10 +46,16 @@ #define printf _cprintf #endif +#ifdef INTERFACE64 +#define MSGFMT " ** On entry to %6s parameter number %2ld had an illegal value\n" +#else +#define MSGFMT " ** On entry to %6s parameter number %2d had an illegal value\n" +#endif + #ifdef __ELF__ int __xerbla(char *message, blasint *info, blasint length){ - printf(" ** On entry to %6s parameter number %2d had an illegal value\n", + printf(MSGFMT, message, *info); return 0; @@ -61,7 +67,7 @@ int BLASFUNC(xerbla)(char *, blasint *, blasint) __attribute__ ((weak, alias ("_ int BLASFUNC(xerbla)(char *message, blasint *info, blasint length){ - printf(" ** On entry to %6s parameter number %2d had an illegal value\n", + printf(MSGFMT, message, *info); return 0;