Fix cast to work with INTERFACE64 (especially on big-endian)
This commit is contained in:
parent
1031d161f6
commit
b1d722fc0c
|
@ -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;
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue