This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
[gfortran] patch PR 19216
- From: THOMAS Paul Richard 169137 <prthomas at drfccad dot cea dot fr>
- To: "'Francois-Xavier dot Coudert at lcp dot u-psud dot fr'" <Francois-Xavier dot Coudert at lcp dot u-psud dot fr>
- Cc: "'fortran at gcc dot gnu dot org'" <fortran at gcc dot gnu dot org>
- Date: Fri, 15 Apr 2005 11:44:31 +0200
- Subject: [gfortran] patch PR 19216
I agree with the proposed patch:
In fact, the namelist version has...
case '/':
input_complete = 1;
if (!namelist_mode) /* I failed to note that list-directed = namelist
here! */
{
next_record (0);
at_eol = 1;
}
break;
case '\n':
case '\r':
at_eol = 1; /* This needs to be added to trigger finish_separator=>
my namelist patch. */
break;
and I suggest that the bit in finish_separator:
case '/':
input_complete = 1;
next_record (0);
break;
be treated to the same punishment (The if(!namelist_mode) is present in
mine.).
Paul T