From: Debian Science Team <debian-science-maintainers@lists.alioth.debian.org>
Date: Mon, 29 Apr 2024 15:31:55 +0000 (+0200)
Subject: Fix FTBFS on big-endian 64-bit architectures
X-Git-Tag: archive/raspbian/0.3.27+ds-2+rpi1^2~1
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=78d62e302182f8d3ada0e5628339f188d4bf94a8;p=openblas.git

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 9487b20..8c90d4c 100644
--- 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
+}