format.c: (parse_format_list): No comma is required after P descriptor.

* io/format.c: (parse_format_list): No comma is required after
	P descriptor.

From-SVN: r81819
This commit is contained in:
Tobias Schlüter 2004-05-13 23:36:16 +00:00 committed by Paul Brook
parent c39373da49
commit 187f073476
2 changed files with 7 additions and 2 deletions

View File

@ -1,3 +1,8 @@
2004-05-13 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
* io/format.c: (parse_format_list): No comma is required after
P descriptor.
2004-05-13 Bud Davis <bdavis9659@comcast.net> 2004-05-13 Bud Davis <bdavis9659@comcast.net>
PR fortran/15204 PR fortran/15204

View File

@ -1,4 +1,4 @@
/* Copyright (C) 2002-2003 Free Software Foundation, Inc. /* Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
Contributed by Andy Vaught Contributed by Andy Vaught
This file is part of the GNU Fortran 95 runtime library (libgfortran). This file is part of the GNU Fortran 95 runtime library (libgfortran).
@ -510,7 +510,7 @@ format_item:
} }
saved_token = t; saved_token = t;
goto between_desc; goto optional_comma;
case FMT_P: /* P and X require a prior number */ case FMT_P: /* P and X require a prior number */
error = "P descriptor requires leading scale factor"; error = "P descriptor requires leading scale factor";