From 1dad1fa1f44d1ac1a0e14475aeb708556d1e05d5 Mon Sep 17 00:00:00 2001 From: pbrook Date: Thu, 13 May 2004 23:36:16 +0000 Subject: [PATCH] * 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 --- libgfortran/ChangeLog | 5 +++++ libgfortran/io/format.c | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 715ceebb1eb..7df9edf3f6c 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2004-05-13 Tobias Schlüter + + * io/format.c: (parse_format_list): No comma is required after + P descriptor. + 2004-05-13 Bud Davis PR fortran/15204 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"; -- 2.11.0