This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Need confirmation PR24459 is NOT-A-BUG
- From: Jerry DeLisle <jvdelisle at verizon dot net>
- To: Fortran List <fortran at gcc dot gnu dot org>
- Date: Wed, 23 Nov 2005 13:31:09 -0800
- Subject: Need confirmation PR24459 is NOT-A-BUG
While driving home from work today, it dawned on me that I don't think this PR
is a bug.
From buzilla, given the following program:
program diag
INTEGER nd
PARAMETER ( nd = 5 )
CHARACTER*(8) names(nd,nd)
NAMELIST / diags / names
OPEN(UNIT=20,FILE='diag.nml',STATUS='OLD')
READ(20,NML=diags)
WRITE(*,NML=diags)
STOP
END
With the nml file as follows:
&diags
names(1,1) = 'ETAN ','ETANSQ ','DETADT2 ','PHIBOT ','PHIBOTSQ',
/
My interpretation is that the names qualifier (1,1) is asking for exactly one
data item. Providing more is contrary to F95 standard, less is OK.
So gfortran happily fills the request and starts looking for the next object in
the file, which does not exist and so a runtime error message is given correctly.
At line 8 of file diag.f
Fortran runtime error: Cannot match namelist object name 'etansq
IFORT happily accepts the input and gives the following:
&DIAGS
NAMES = ETAN ETANSQ DETADT2 PHIBOT PHIBOTSQ
/
As if it is ignoring the qualifier.
I need some consensus on this before I put any more effort on it.
Regards,
Jerry