Update xerbla.c
This commit is contained in:
parent
7f546f54fa
commit
1e06b49854
|
@ -14,7 +14,7 @@ void CNAME(blasint p, char *rout, char *form, ...)
|
||||||
|
|
||||||
if (p)
|
if (p)
|
||||||
fprintf(stderr, "Parameter %d to routine %s was incorrect\n", p, rout);
|
fprintf(stderr, "Parameter %d to routine %s was incorrect\n", p, rout);
|
||||||
vfprintf(stderr, form, argptr);
|
vfprintf(stderr, form, args);
|
||||||
va_end(args);
|
va_end(args);
|
||||||
exit(-1);
|
exit(-1);
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue