This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [patch, libfortran] PR33672 Additional runtime checks needed for namelist reads
- From: Tobias Burnus <burnus at net-b dot de>
- To: Jerry DeLisle <jvdelisle at verizon dot net>
- Cc: Dominique Dhumieres <dominiq at lps dot ens dot fr>, fortran at gcc dot gnu dot org
- Date: Sun, 14 Oct 2007 23:02:00 +0200
- Subject: Re: [patch, libfortran] PR33672 Additional runtime checks needed for namelist reads
- References: <20071013141403.1C6185BB9F@mailhost.lps.ens.fr> <471280D4.4020706@verizon.net>
Jerry DeLisle wrote:
> Dominique Dhumieres wrote:
>> In http://gcc.gnu.org/ml/fortran/2007-10/msg00127.html, I have reported
>> that the patch works without regression on my favourite platform.
>> Although I cannot OK it, I vote for a quick commit.
> This patch has been in the oven for a while. Based on my own testing
> and Dominique's testing. I would like to commit this today unless
> there are objections.
> The patch is well confined and straight forward, and basically simple.
First, I like the diagnostics - they are essentially the same a NAG f95
has; ifort, g95 and sunf95 also reject the namelist, only openf95
accepts it.
Question: Why do you add an empty line in:
----------<cut>------------
/* Check to see if there is a qualifier: if so, parse it.*/
+
if (c == '(' && nl->var_rank)
----------<cut>------------
and in the following, I would put the empty line after the "}":
----------<cut>------------
else
dtp->u.p.expanded_read = 1;
+
}
+ /* Check for non-zero rank. */
----------<cut>------------
Otherwise, the patch looks OK.
Tobias