This is the mail archive of the mailing list for the GCC project.

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[gfortran] Fixes for p and : format descriptors


The I/O-library wrongly enforced a comma after a P edit descriptor. The following is completely valid and accepted by the frontend:
WRITE(*,100) x; 100 FORMAT(1pf5.2)

This one-liner fixes this. And as you can see from my change to the first line, I don't believe it's copyrightable.

2004-05-06 Tobias Schlüter <>

	* io/format.c: Adjust copyright years to fit coding convention.
	(parse_format_list): No comma is required after P descriptor.

- Tobi

Index: format.c
RCS file: /cvsroot/gcc/gcc/libgfortran/io/Attic/format.c,v
retrieving revision
diff -u -p -r1.1.2.4 format.c
--- format.c    23 Apr 2004 01:43:16 -0000
+++ format.c    6 May 2004 21:10:06 -0000
@@ -1,4 +1,4 @@
-/* Copyright (C) 2002-2003 Free Software Foundation, Inc.
+/* Copyright (C) 2002,2003 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";

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]