namelist and /warn: unused

[Norman_K_]

Dear All

This is certainly irritating and probably a minor bug:

subroutine blah()
implicit none
integer                    :: i = 0
real(r_kind)               :: dx = one
complex                    :: c = (two,three)
character(16)              :: ch = 'four'
logical                    :: l = .true.
character(256)             :: ch_out
namelist/this_out/i,dx,c,ch,l
write(ch_out, nml=this_out, iostat=my_iostat, iomsg=my_iomsg)
...
end subroutine blah

Compilation with /warn: unused shows i, dx, ch, c, and l as unused (if not referenced in ...) when they clearly are used via the inclusion in the namelist.

I am using 17.0.7.272 [Intel(R) 64]

Just a thought

Norman