------- Comment #2 from pinskia at gcc dot gnu dot org 2006-02-06 20:27 -------
Confirmed.
Simple example:
!{ dg-do run }
! Tests filling variables from a namelist read when object list is
! not complete.
program pr
implicit none
integer, parameter :: max_domains = 4
integer ier
logical, dimension(max_domains) :: non_hydrostatic
integer, dimension(max_domains) :: time_step_sound
namelist /dynamics/ non_hydrostatic
namelist /dynamics/ time_step_sound
non_hydrostatic = .true.
read (5, nml=dynamics, iostat=ier, err = 1000)
print *, non_hydrostatic
print *, time_step_sound
stop
1000 call abort()
end program pr
----
cat a
&dynamics
non_hydrostatic = .true., .true., .true
time_step_sound = 4, 4, 4,
/
--------
./a.out < a
namelist read: missplaced = sign
Cannot match namelist object name 4,
Cannot match namelist object name 4,
Cannot match namelist object name 4,
T T T T
19036 -1881089148 -1073742864 1140850722
So what is happening is that we don't recognize the start of the differrent
namelist object.
--
pinskia at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2006-02-06 20:27:42
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=26136
