diff --git a/interface/xerbla.c b/interface/xerbla.c
index b2687fb1e..c3a174552 100644
--- a/interface/xerbla.c
+++ b/interface/xerbla.c
@@ -14,7 +14,7 @@ void CNAME(blasint p, char *rout, char *form, ...)
 
    if (p)
       fprintf(stderr, "Parameter %d to routine %s was incorrect\n", p, rout);
-   vfprintf(stderr, form, argptr);
+   vfprintf(stderr, form, args);
    va_end(args);
    exit(-1);
 }