Mercurial > octave

comparison liboctave/numeric/gsvd.cc @ 31368:18fac4a92fa6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
build: Silence compilation warning about mismatching integer format (bug #63290). * liboctave/numeric/gsvd.cc (gsvd<T>::gsvd): Use format string matching the Fortran integer type.
author Markus Mützel <markus.muetzel@gmx.de>
date Sun, 30 Oct 2022 09:22:23 +0100
parents 796f54d4ddbf
children e88a07dec498
comparison
equal deleted inserted replaced
31367:a448b8a0ffff 31368:18fac4a92fa6
568 alpha, beta, u, nrow_u, v, nrow_v, q, nrow_q, 568 alpha, beta, u, nrow_u, v, nrow_v, q, nrow_q,
569 work, lwork, iwork, info); 569 work, lwork, iwork, info);
570 570
571 if (info < 0) 571 if (info < 0)
572 (*current_liboctave_error_handler) 572 (*current_liboctave_error_handler)
573 ("*ggsvd.f: argument %d illegal", -info); 573 ("*ggsvd.f: argument %" OCTAVE_F77_INT_TYPE_FORMAT " illegal",
574 -info);
574 575
575 if (info > 0) 576 if (info > 0)
576 (*current_liboctave_error_handler) 577 (*current_liboctave_error_handler)
577 ("*ggsvd.f: Jacobi-type procedure failed to converge"); 578 ("*ggsvd.f: Jacobi-type procedure failed to converge");
578 579