re PR libfortran/25419 (gfortran read does not take comma for default on one entry)

2005-12-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/25419
	* io/list_read.c (list_formatted_read_scalar): Allow comma to return a
	null value (default).

From-SVN: r109099
This commit is contained in:
Jerry DeLisle 2005-12-28 06:59:35 +00:00
parent 618f4a9487
commit 93f006d8e3
2 changed files with 7 additions and 4 deletions

View File

@ -1,3 +1,9 @@
2005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25419
* io/list_read.c (list_formatted_read_scalar): Allow comma to return a
null value (default).
2005-12-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25307

View File

@ -1353,10 +1353,7 @@ list_formatted_read_scalar (st_parameter_dt *dtp, bt type, void *p, int kind,
{ /* Found a null value. */
eat_separator (dtp);
dtp->u.p.repeat_count = 0;
if (dtp->u.p.at_eol)
finish_separator (dtp);
else
goto cleanup;
goto cleanup;
}
}