Mercurial > octave

diff liboctave/numeric/gsvd.cc @ 29417:a6ab7069a87c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use matching format string for Fortran integers. * oct-conf-post.in.h: Define OCTAVE_F77_INT_TYPE_FORMAT with macro for Fortran integer formating. * libinterp/corefcn/__pchip_deriv__.cc (F__pchip_deriv__), liboctave/numeric/DASSL.cc (DASSL::do_integrate), liboctave/numeric/gsvd.cc (gsvd<T>::gsvd): Use new macro in formatting strings.
author Markus Mützel <markus.muetzel@gmx.de>
date Tue, 09 Mar 2021 21:05:54 +0100
parents 0a5b15007766
children 4ee01c14fccd
line wrap: on
line diff
--- a/liboctave/numeric/gsvd.cc	Tue Mar 09 20:15:27 2021 +0100
+++ b/liboctave/numeric/gsvd.cc	Tue Mar 09 21:05:54 2021 +0100
@@ -585,8 +585,9 @@
                       info);
 
       if (info < 0)
-        (*current_liboctave_error_handler) ("*ggsvd.f: argument %d illegal",
-                                            -info);
+        (*current_liboctave_error_handler)
+          ("*ggsvd.f: argument %" OCTAVE_F77_INT_TYPE_FORMAT " illegal",
+           -info);
       else
         {
           if (info > 0)