Use appropriate int32/int64 format for error number in message string
authorMartin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Thu, 29 Dec 2016 23:45:59 +0000 (00:45 +0100)
committerGitHub <noreply@github.com>
Thu, 29 Dec 2016 23:45:59 +0000 (00:45 +0100)
driver/others/xerbla.c

index 7427b51..4f26042 100644 (file)
 #define printf _cprintf
 #endif
 
+#ifdef INTERFACE64
+#define MSGFMT " ** On entry to %6s parameter number %2d had an illegal value\n" 
+#else
+#define MSGFMT " ** On entry to %6s parameter number %2ld 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;