Bug in PGI Fortran 7.1.4, 7.1.6

Accelerated Computing HPC Compilers Legacy PGI Compilers
1

With this distilled extract

module pqr
  implicit none
  type kp
    integer :: index(1:4) = -1
    integer :: null                   ! <== use of null here triggers bug
  end type kp
   type kpn
      private 
      type(kp)                     :: ma77keep
      integer,  dimension(:), pointer     :: ma57_ifact => null()
   end type kpn
end module pqr

the compiler gets confused by the use of ‘null’ as an integer and the call to the intrinsic function null() and says

PGF90-S-0084-Illegal use of symbol null (pqr.f90: 10)
0 inform, 0 warnings, 1 severes, 0 fatal for pqr

I request that someone try and report whether a more recent version of the compiler (than 7.1.4, 7.1.6) shows the same bug.

2

Hi N. Shamsundar,

Thank you for the report. This is first time we’ve since this issue so unfortunately the problem is still present in the 8.0 compilers. I’ve created a technical problem report (TPR#15470) and have passed it along to our engineers for investigation. Hopefully we can have it fixed shortly.

Best Regards,
Mat

3

Hi N. Shamsundar,

TPR #15470 has been fixed as of the 8.0-4 release.

  • Mat