diff options
author | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-13 23:36:16 +0000 |
---|---|---|
committer | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-13 23:36:16 +0000 |
commit | 1dad1fa1f44d1ac1a0e14475aeb708556d1e05d5 (patch) | |
tree | e3563c6b74b5f400422935fc1cb7b81ec6d3c917 /libgfortran/io | |
parent | 60b93f922aa5caab5206936061e19e2accc995a3 (diff) | |
download | gcc-1dad1fa1f44d1ac1a0e14475aeb708556d1e05d5.tar.gz |
* io/format.c: (parse_format_list): No comma is required after
P descriptor.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@81819 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io')
-rw-r--r-- | libgfortran/io/format.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/io/format.c b/libgfortran/io/format.c index caec1672da5..0be913c59b9 100644 --- a/libgfortran/io/format.c +++ b/libgfortran/io/format.c @@ -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 This file is part of the GNU Fortran 95 runtime library (libgfortran). @@ -510,7 +510,7 @@ format_item: } saved_token = t; - goto between_desc; + goto optional_comma; case FMT_P: /* P and X require a prior number */ error = "P descriptor requires leading scale factor"; |