# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1530304794 14400
# Node ID c05adc188b985f46a43ab3ab8e0abea81d75d09a
# Parent  5daeb404908867d6e3383302188763a04f03ecda
use int instead of size_t for xerbla string length (bug #54206)

* xerbla.c: Use int instead of size_t for string length.  Int should
be sufficient for the values expected since the parameter is intended
to hold a Fortran subroutine or function name.

diff -r 5daeb4049088 -r c05adc188b98 liboctave/external/blas-xtra/xerbla.c
--- a/liboctave/external/blas-xtra/xerbla.c	Wed Apr 25 09:51:59 2018 -0700
+++ b/liboctave/external/blas-xtra/xerbla.c	Fri Jun 29 16:39:54 2018 -0400
@@ -59,9 +59,9 @@
                            F77_CHAR_ARG_LEN_DEF (len))
 {
   const char *s = F77_CHAR_ARG_USE (s_arg);
-  size_t slen = F77_CHAR_ARG_LEN_USE (s_arg, len);
+  int slen = F77_CHAR_ARG_LEN_USE (s_arg, len);
 
-  fprintf (stderr, "%.*s: parameter number %ld is invalid\n", slen, s,
+  fprintf (stderr, "%.*s: parameter number %d is invalid\n", slen, s,
            (long) (*info));
 
    if (xerbla_handler)