diff --git a/util/psb_c_renum_impl.F90 b/util/psb_c_renum_impl.F90 index c2caca32..8d9b0060 100644 --- a/util/psb_c_renum_impl.F90 +++ b/util/psb_c_renum_impl.F90 @@ -267,7 +267,7 @@ contains name = 'mat_renum_amd' call psb_erractionsave(err_act) -#if defined(HAVE_AMD) +#if defined(HAVE_AMD) && !defined(INT_I8_L8) info = psb_success_ nr = a%get_nrows() diff --git a/util/psb_d_renum_impl.F90 b/util/psb_d_renum_impl.F90 index ad73527a..5c32bd05 100644 --- a/util/psb_d_renum_impl.F90 +++ b/util/psb_d_renum_impl.F90 @@ -267,7 +267,7 @@ contains name = 'mat_renum_amd' call psb_erractionsave(err_act) -#if defined(HAVE_AMD) +#if defined(HAVE_AMD) && !defined(INT_I8_L8) info = psb_success_ nr = a%get_nrows() diff --git a/util/psb_metispart_mod.F90 b/util/psb_metispart_mod.F90 index ba75a0de..3ef6fc94 100644 --- a/util/psb_metispart_mod.F90 +++ b/util/psb_metispart_mod.F90 @@ -314,7 +314,7 @@ contains integer(psb_ipk_), allocatable :: irpl(:),jal(:),gvl(:) real(psb_spk_),allocatable :: wgh_(:) -#if defined(HAVE_METIS) +#if defined(HAVE_METIS) && !defined(INT_I8_L8) interface ! subroutine METIS_PartGraphKway(n,ixadj,iadj,ivwg,iajw,& ! & wgflag,numflag,nparts,weights,iopt,nedc,part) bind(c) diff --git a/util/psb_s_renum_impl.F90 b/util/psb_s_renum_impl.F90 index 60d3ec9c..05a7794c 100644 --- a/util/psb_s_renum_impl.F90 +++ b/util/psb_s_renum_impl.F90 @@ -268,7 +268,7 @@ contains name = 'mat_renum_amd' call psb_erractionsave(err_act) -#if defined(HAVE_AMD) +#if defined(HAVE_AMD) && !defined(INT_I8_L8) info = psb_success_ nr = a%get_nrows() diff --git a/util/psb_z_renum_impl.F90 b/util/psb_z_renum_impl.F90 index 7b212aca..4a98093a 100644 --- a/util/psb_z_renum_impl.F90 +++ b/util/psb_z_renum_impl.F90 @@ -267,7 +267,7 @@ contains name = 'mat_renum_amd' call psb_erractionsave(err_act) -#if defined(HAVE_AMD) +#if defined(HAVE_AMD) && !defined(INT_I8_L8) info = psb_success_ nr = a%get_nrows()