diff --git a/base/modules/psb_const_mod.f90 b/base/modules/psb_const_mod.f90 index 71a310d9..38416cb0 100644 --- a/base/modules/psb_const_mod.f90 +++ b/base/modules/psb_const_mod.f90 @@ -31,7 +31,10 @@ !!$ module psb_const_mod - ! This should be integer(8), and normally different from default integer. + ! This is the default integer + integer, parameter :: ndig=8 + integer, parameter :: psb_int_k_ = selected_int_kind(ndig) + ! This is an 8-byte integer, and normally different from default integer. integer, parameter :: longndig=12 integer, parameter :: psb_long_int_k_ = selected_int_kind(longndig) !