fhash_tbl.f90 contains several calls to the modulo intrinsic function in which different integer kinds are passed, which is not allowed per the Fortran 2008 standard.
If the code is compiled using gfortran with the -std=f2008 option set the following errors are issued:
src/fhash_tbl.f90:298:28:
298 | index = modulo(key%hash(),size(tbl%buckets)) + 1
| 1
Error: GNU Extension: Different type kinds at (1)
src/fhash_tbl.f90:245:28:
245 | index = modulo(key%hash(),size(tbl%buckets)) + 1
| 1
Error: GNU Extension: Different type kinds at (1)
src/fhash_tbl.f90:165:28:
165 | index = modulo(key%hash(),size(tbl%buckets)) + 1
| 1
Error: GNU Extension: Different type kinds at (1)
src/fhash_tbl.f90:133:28:
133 | index = modulo(key%hash(),size(tbl%buckets)) + 1
| 1
Error: GNU Extension: Different type kinds at (1)
fhash_tbl.f90 contains several calls to the
modulo
intrinsic function in which different integer kinds are passed, which is not allowed per the Fortran 2008 standard.If the code is compiled using gfortran with the
-std=f2008
option set the following errors are issued: