bug ? to compile very simple module with pgf90 18.10 CE

Hi,

MODULE m_test
 implicit none
 private

 integer,private,parameter :: HDR_KNOWN_HEADFORMS(1) = [80]

 integer,public,parameter :: HDR_LATEST_HEADFORM = HDR_KNOWN_HEADFORMS(size(HDR_KNOWN_HEADFORMS))

END MODULE m_test



pgf95 -c -o m_test.o m_test.F90
PGF90-S-0000-Internal compiler error. get_const_from_ast: can’t get const value 0 (m_test.F90: 9)
PGF90-S-0000-Internal compiler error. get_const_from_ast: can’t get const value 0 (m_test.F90: 9)
PGF90-S-0000-Internal compiler error. get_const_from_ast: can’t get const value 0 (m_test.F90: 9)
PGF90-F-0000-Internal compiler error. Subscript for array is out-of-bounds 0 (m_test.F90: 9)
PGF90/x86-64 Linux 18.10-1: compilation aborted



gfortran -c -o m_test.o m_test.F90
gfortran --version
GNU Fortran (GCC) 8.2.1 20181105 (Red Hat 8.2.1-5)
Copyright © 2018 Free Software Foundation, Inc.

compiled without error by gnu (all versions)/ intel (all versions ) / xlf (15.x) / nag(6.x) !
bug ?

thank you,

Hi jmbeuken,

Thanks for the report! This is a known issue (tracked as TPR#24263). The good news is that we have a fix in place that should be available in an up coming release.

-Mat

Oh my God, I forgot that it’s already me who reported the problem in 2017 …
PGI is used by many developers and we would like our open source code ABINIT (www.abinit.org) to be compiled by PGI…
I’m glad to hear that there is finally a patch!
Thank you