Fix FTBFS on big-endian 64-bit architectures

Origin: upstream, https://github.com/OpenMathLib/OpenBLAS/commit/b1d722fc0cf563298de8c5ae66fc04a1901d4bf1
Bug: https://github.com/OpenMathLib/OpenBLAS/issues/4633
Reviewed-by: Sébastien Villemot <sebastien@debian.org>
Last-Update: 2024-04-29

A long* pointer was incorrectly cast as an int*.
Last-Update: 2024-04-29
Gbp-Pq: Name testsuite-64bit-big-endian.patch

diff --git a/utest/test_extensions/xerbla.c b/utest/test_extensions/xerbla.c
index 9487b20a64ec093718b8dd02b2833a44eb190596..8c90d4ce7519f393808d451b37e84babee8cbc76 100644 (file)
--- a/utest/test_extensions/xerbla.c
+++ b/utest/test_extensions/xerbla.c
@@ -39,7 +39,7 @@ static char *rout;
 
 static void F77_xerbla(char *srname, void *vinfo)
 {
-   int info=*(int*)vinfo;
+   blasint info=*(blasint*)vinfo;
 
    if (link_xerbla)
    {
@@ -85,4 +85,4 @@ void set_xerbla(char* current_rout, int expected_info){
    lerr = TRUE;
    _info = expected_info;
    rout = current_rout;
-}
\ No newline at end of file
+}