This is the mail archive of the gcc-bugs@gcc.gnu.org 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]

[Bug fortran/16479] COMMON block names are not private


------- Additional Comments From olchansk at panix dot com  2004-07-11 21:31 -------
This is a fix for the incorrectly printed name of the common block:
[olchansk@send fortran]$ cvs diff -u match.c
Index: match.c
===================================================================
RCS file: /cvsroot/gcc/gcc/gcc/fortran/match.c,v
retrieving revision 1.15
diff -u -r1.15 match.c
--- match.c     1 Jul 2004 07:50:18 -0000       1.15
+++ match.c     11 Jul 2004 21:30:04 -0000
@@ -2146,7 +2146,7 @@
          if (t->use_assoc)
            {
              gfc_error ("COMMON block '%s' at %C has already "
-                        "been USE-associated");
+                        "been USE-associated", name);
              goto cleanup;
            }
        }

K.O.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=16479


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